Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Refreš forme nakon inserta iz txt fajla sa VB skriptom

[es] :: Access :: Refreš forme nakon inserta iz txt fajla sa VB skriptom

[ Pregleda: 2116 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

davor.s

Član broj: 219933
Poruke: 3
*.dsl.optinet.hr.



Profil

icon Refreš forme nakon inserta iz txt fajla sa VB skriptom17.04.2009. u 20:55 - pre 182 meseci
Imam skriptu koja radi insert podataka iz txt fajla u tabelu MS Accessa. Problem je što imam potrebu da se nakon promjene podataka u tabeli, forma sa podacima osvježi, odnosno da se otvori ako nije otvorena. Aplikacija na MS Accessu više manje stalno je dignuta tako da bi trebao nastavak koda za refreš forme "frmAlarm" ili neko drugo rješenje (osim da Access stalno radi Requery na formu)


Hvala unaprijed za svaku pomoć.

Code:
Set MyConn = CreateObject("ADODB.Connection")
MdbFilePath = "C:\Alarmi ulaza.mdb"
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
 
SQL_query = "qryInsert"
 
Set RS = MyConn.Execute(SQL_query)


'RS.Close
set RS = nothing  
MyConn.close
set MyConn = nothing
 
Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.



+8 Profil

icon Re: Refreš forme nakon inserta iz txt fajla sa VB skriptom18.04.2009. u 13:33 - pre 182 meseci
Malo me čudi ovakvo pitanje...
Code:
Set MyConn = CreateObject("ADODB.Connection")
MdbFilePath = "C:\Alarmi ulaza.mdb"
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
 
SQL_query = "qryInsert"
 
Set RS = MyConn.Execute(SQL_query)


'RS.Close
set RS = nothing  
MyConn.close
set MyConn = nothing

' OVDE UBACIŠ IME FORME KOJU HOĆEŠ DA OSVEŽIŠ
MojaForma.Requery

Ozbiljan i odgovoran mladić
 
Odgovor na temu

Catch 22

Član broj: 148083
Poruke: 6176
77.46.178.*



+21 Profil

icon Re: Refreš forme nakon inserta iz txt fajla sa VB skriptom18.04.2009. u 14:23 - pre 182 meseci
^ Samo dodaj i deo koda koji će da ispita da li je forma trenutno otvorena (ako nije, dovoljno je da je samo otvori)
;)
Citat:
davor.s:...da se nakon promjene podataka u tabeli, forma sa podacima osvježi, odnosno da se otvori ako nije otvorena.

 
Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.



+8 Profil

icon Re: Refreš forme nakon inserta iz txt fajla sa VB skriptom20.04.2009. u 12:31 - pre 182 meseci
Pošteno, nisam pročitao celo pitanje, pošto je odgovor baš lagan pa sam se zaleteo Ipak, ispostavilo se da pitanje ima neki catch
Code:
Set MyConn = CreateObject("ADODB.Connection")
MdbFilePath = "C:\Alarmi ulaza.mdb"
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
 
SQL_query = "qryInsert"
 
Set RS = MyConn.Execute(SQL_query)


'RS.Close
set RS = nothing  
MyConn.close
set MyConn = nothing

' OVDE UBACIŠ IME FORME KOJU HOĆEŠ DA OSVEŽIŠ
If CurrentProject.AllForms("MojaForma").IsLoaded Then
MojaForma.Requery
Else
DoCmd.OpenForm "MojaForma"
End If

Ozbiljan i odgovoran mladić
 
Odgovor na temu

davor.s

Član broj: 219933
Poruke: 3
*.dsl.optinet.hr.



Profil

icon Re: Refreš forme nakon inserta iz txt fajla sa VB skriptom20.04.2009. u 16:58 - pre 182 meseci
Ovo ne radi. Možda nisam bio najjasniji, radi se o VB skripti koja se poziva izvan MS Access aplikacije.
 
Odgovor na temu

[es] :: Access :: Refreš forme nakon inserta iz txt fajla sa VB skriptom

[ Pregleda: 2116 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.