[ viss02 @ 05.09.2006. 18:36 ] @
Molim Vas pomozite mi oko otvaranja modula u access-u 97. Modul bi trebao da se ucita kada i form.
Hnapred hvala, ako nije problem dajte i neki primer :)
[ Trtko @ 06.09.2006. 07:50 ] @
Nisi bas pojasnio sto zelis.
Modul se ne poziva, nego se pozivaju funkcije koje si u tom modulu napisao
a zoves ih iz bilo koje forme ili querya , reporta.
Znaci u modulima se koriste i deklaracije varijabli koje vaze za cijelu aplikaciju

Evo primjer funkcije koju koristim po potrebi iz querya , formi , a ona je napisana
u modulu




Public Function pretvori(dovezi As String) As String
Dim staraslova As String

staraslova = dovezi
staraslova = Replace(staraslova, "[", "Š")
staraslova = Replace(staraslova, "{", "š")

staraslova = Replace(staraslova, "]", "Ć")
staraslova = Replace(staraslova, "}", "ć")

staraslova = Replace(staraslova, "^", "Č")
staraslova = Replace(staraslova, "~", "č")

staraslova = Replace(staraslova, "@", "Ž")
staraslova = Replace(staraslova, "`", "ž")

staraslova = Replace(staraslova, "\", "Đ")
staraslova = Replace(staraslova, "|", "đ")
pretvori = staraslova
End Function


[ viss02 @ 06.09.2006. 15:27 ] @
Pa interesuje me kako da pozovem modul iz forma.
[ Trtko @ 07.09.2006. 09:51 ] @
Pa ovako , funkcija ti se u modulu zove pretvori

I iz bilo koje forme je pozivas ovako , kako dolje piše


mojstring="DOBRO DO[LI"
rezultat=pretvori(mojstring)

i dobiješ

rezultat="DOBRO DOŠLI"

[ viss02 @ 08.09.2006. 23:16 ] @
Hvala na pomoći, smašao sam se, ali na neki drugi način.
[ viss02 @ 12.09.2006. 15:13 ] @
Evo jedno bolje rešenje:
Code:
Private Sub Form_Load()
Call modul
End Sub

Gde je:modul - ime stringa u modulu koji treba da se pokrene.