[ ombrs.do @ 22.01.2009. 15:00 ] @
U ovom kodu
Private Sub Command1_Click
NadjiTekst "d:\racuni\izdati.ok", "tralala"
End Sub
proba sam zamjeniti extenziju ".ok" sa ".*" ali ne radi,jer printer nekad salje fajl sa ekstenzijom ".ok" ako je sve u redu,a usljed greske ekstenziju ".err"
Pokusao sam sa

Private Sub Command1_Click
NadjiTekst "d:\racuni\izdati.*", "tralala"
End Sub

ali ne ide.Hvala puno
[ domaci_a_nas @ 22.01.2009. 21:18 ] @
Probaj ovako:
Code:
If Dir("d:\racuni\izdati.ok") <> "" then
NadjiTekst "d:\racuni\izdati.ok", "tralala"
Else
NadjiTekst "d:\racuni\izdati.err", "tralala"
End if
[ ombrs.do @ 23.01.2009. 08:31 ] @
To je to.
Svaka cast i hvala puno