Predmet:Re: Access i GoogleMaps
Eksperimeniro sam sa promjenom zuma od 1 do 8 i niÅ¡ta se nije promjenilo. Bez poruke MsgBox-a koji je dodan da uspori proceduru, pretraga kod mene uvjek stane i ne pronađu se sva mjesta.
Ovo sa porukom je odlično i svaki puta se pronađu sve adrese, jedino Å¡to je malo dosdno stalno tiskati 'Enter'
U međuvremenu sam tražio neko rjeÅ¡enje da se ne mora nakon savake poruke tiskati 'ENTER' i naÅ¡ao sam ovo:
PreuzmiIzvorni kôd (vbnet):Option Compare Database
Option Explicit
Private Sub Command0_Click()
Me.TimerInterval = 5000
MsgBox "Pozdrav. Gasim se nakon 5 sekundi."
Me.TimerInterval = 0
End Sub
Private Sub Form_Timer()
SendKeys "{Enter}"
End Sub
Međutim to radi kada se poruka otvori sa nekog dugmeta, ali neće kada sam to dadao u proceduru
PreuzmiIzvorni kôd (vbnet):start:
If X = "True" Then
Me.TimerInterval = 5000
MsgBox Firma & ", " & Mjesto & ", " & Zemlja, , "Pronaeno je"
Me.TimerInterval = 0
Rs.MoveNext
Else
DoEvents
GoTo start
End If
Pozdrav