iCentar » Racunari i oprema » Programirannje i baze podataka » Access

zxz	23.04.2012 14:05
Predmet:Re: Access i GoogleMaps To ti javlja da nije nasao odnosno sporo ucita kartu pa nemoze da stigne a los je i onaj html. Napravit cu ti nesto samo dok stignem.

zxz	23.04.2012 16:00
Predmet:Re: Access i GoogleMaps Evo ti moja mapa pa probaj. Trebao bi dodati i adrese pa da necemu sluzi. Za sad nemas adresa u bazi. Dobro bi bilo popisati i georafsku sirinu i duzinu u bazu pa bi brze radilo. To se moze kodom napraviti da se popise samo treba napraviti bazu mjesta. Ovo se moze iskoristiti za dosta drugih informacija pa cak i sliku objekta staviti.
Prilozi: Google Mapszxz.zip (Velicina datoteke:44.04 KB)

zxz

23.04.2012 16:00

Predmet:Re: Access i GoogleMaps

Evo ti moja mapa pa probaj.
Trebao bi dodati i adrese pa da necemu sluzi.
Za sad nemas adresa u bazi.
Dobro bi bilo popisati i georafsku sirinu i duzinu u bazu pa bi brze radilo.
To se moze kodom napraviti da se popise samo treba napraviti bazu mjesta.
Ovo se moze iskoristiti za dosta drugih informacija pa cak i sliku objekta staviti.

Prilozi:
Google Mapszxz.zip (Velicina datoteke:44.04 KB)

roko	23.04.2012 16:16
Predmet:Re: Access i GoogleMaps bi se moglo po IP adresi locirati pozicija korisnika ?

roko

23.04.2012 16:16

Predmet:Re: Access i GoogleMaps

bi se moglo po IP adresi locirati pozicija korisnika ?

zxz	23.04.2012 16:54
Predmet:Re: Access i GoogleMaps Citat: bi se moglo po IP adresi locirati pozicija korisnika ? U ovom slucaju nemoze po ip jer korisnik ne pristupa ovome ali se moze po adresi dobiti g. sirina i duzina.

zxz

23.04.2012 16:54

Predmet:Re: Access i GoogleMaps

Citat:

bi se moglo po IP adresi locirati pozicija korisnika ?

U ovom slucaju nemoze po ip jer korisnik ne pristupa ovome ali se moze po adresi dobiti g. sirina i duzina.

pmiroslav	23.04.2012 18:02
Predmet:Re: Access i GoogleMaps Ovo je odlično. Jedino Å¡to je podatak u oblačiću za sva markirana mjesta isti. PokuÅ¡ao sam mjenjati ovaj dio koda, jer mi tu nije bitna Å¡ifra kupca niti rabat: hd.all("opis").Value = Format$(Rs!SifraKupca) & "-" & Format$(Rs!Firma) & "<br>Rabat:" & Format$(Rs!zadaniRabat) Pa sam napisao hd.all("opis").Value = Format$(Rs!Firma) & "-" & Format$(Rs!Adresa) & "-" & Format$(Rs!Mjesto) Ali mi se nakon toga kod zaustavi i javlja greÅ¡ku
Prilozi: Image1.jpg (Velicina datoteke:254.35 KB) Image2.jpg (Velicina datoteke:256.13 KB)

pmiroslav

23.04.2012 18:02

Predmet:Re: Access i GoogleMaps

Ovo je odlično. Jedino Å¡to je podatak u oblačiću za sva markirana mjesta isti.
PokuÅ¡ao sam mjenjati ovaj dio koda, jer mi tu nije bitna Å¡ifra kupca niti rabat:
hd.all("opis").Value = Format$(Rs!SifraKupca) & "-" & Format$(Rs!Firma) & "<br>Rabat:" & Format$(Rs!zadaniRabat)

Pa sam napisao

hd.all("opis").Value = Format$(Rs!Firma) & "-" & Format$(Rs!Adresa) & "-" & Format$(Rs!Mjesto)

Ali mi se nakon toga kod zaustavi i javlja greÅ¡ku

Prilozi:
Image1.jpg (Velicina datoteke:254.35 KB)
Image2.jpg (Velicina datoteke:256.13 KB)

zxz	23.04.2012 22:24
Predmet:Re: Access i GoogleMaps Hehe kod mene nije isti. Uzmi moj orginal. Citat: hd.all("opis").Value = Format$(Rs!Firma) & "-" & Format$(Rs!Adresa) & "-" & Format$(Rs!Mjesto) Nema greske u ovome. Kazi koja polja zelis pa cu prepraviti.

zxz

23.04.2012 22:24

Predmet:Re: Access i GoogleMaps

Hehe kod mene nije isti.
Uzmi moj orginal.

Citat:

hd.all("opis").Value = Format$(Rs!Firma) & "-" & Format$(Rs!Adresa) & "-" & Format$(Rs!Mjesto)

Nema greske u ovome.
Kazi koja polja zelis pa cu prepraviti.

pmiroslav	24.04.2012 10:16
Predmet:Re: Access i GoogleMaps Evo ja sam malo preradio izvorni kod, kako bih otprilike Å¾elio da to bude, ali joÅ¡ uvjek je kod mene jedno te isti tekst na svim lokacijama koje se prikaÅ¾u. PreuzmiIzvorni kôd (vbnet): Function Ucitaj() On Error Resume Next Dim Db As Database Dim Rs As Recordset Dim Mjesto As String, Zemlja As String Dim X Set hd = Me.WebBrowser0.Document Set Db = CurrentDb Set Rs = Forms![frmGdjeJeProdan].RecordsetClone Rs.MoveLast Rs.MoveFirst Do While Not Rs.EOF Mjesto = Format$(Rs!Mjesto) If Mjesto <> "" Then ' ** ovdje sam stavio ' vbCrLf & " - " & Format$(Rs!Proizvod)' jer bih Å¾elio da ovo ide u novi red, ali to ne radi ** hd.all("opis").Value = Format$(Rs!Firma) & _ ", " & Format$(Rs!Adresa) & _ ", " & Format$(Rs!Mjesto) & _ vbCrLf & " - " & Format$(Rs!Proizvod) & _ " - " & Format$(Rs!SumOfIzlaz) & " kom." hd.all("address").Value = Mjesto hd.all("findAdrress").Click End If start: X = hd.all("PlaceName").Value If X = "True" Then Rs.MoveNext Else DoEvents GoTo start End If Loop Rs.Close Set Db = Nothing Set hd = Nothing Set hd = Nothing End Function
Prilozi: Google Mapszxz_2.rar (Velicina datoteke:54.71 KB)

pmiroslav

24.04.2012 10:16

Predmet:Re: Access i GoogleMaps

Evo ja sam malo preradio izvorni kod, kako bih otprilike Å¾elio da to bude, ali joÅ¡ uvjek je kod mene jedno te isti tekst na svim lokacijama koje se prikaÅ¾u.

PreuzmiIzvorni kôd (vbnet):

Function Ucitaj()
On Error Resume Next
Dim Db As Database
Dim Rs As Recordset
Dim Mjesto As String, Zemlja As String
Dim X
Set hd = Me.WebBrowser0.Document
Set Db = CurrentDb
Set Rs = Forms![frmGdjeJeProdan].RecordsetClone
Rs.MoveLast
Rs.MoveFirst
Do While Not Rs.EOF
Mjesto = Format$(Rs!Mjesto)
If Mjesto <> "" Then
' **** ovdje sam stavio ' vbCrLf & " - " & Format$(Rs!Proizvod)' jer bih Å¾elio da ovo ide u novi red, ali to ne radi ****
hd.all("opis").Value = Format$(Rs!Firma) & _
", " & Format$(Rs!Adresa) & _
", " & Format$(Rs!Mjesto) & _
vbCrLf & " - " & Format$(Rs!Proizvod) & _
" - " & Format$(Rs!SumOfIzlaz) & " kom."
hd.all("address").Value = Mjesto
hd.all("findAdrress").Click
End If
start:
X = hd.all("PlaceName").Value
If X = "True" Then
Rs.MoveNext
Else
DoEvents
GoTo start
End If
Loop
Rs.Close
Set Db = Nothing
Set hd = Nothing
Set hd = Nothing
End Function

Prilozi:
Google Mapszxz_2.rar (Velicina datoteke:54.71 KB)

zxz	25.04.2012 13:22
Predmet:Re: Access i GoogleMaps Kolicinu i naziv proizvoda nemas uovdje pa nisam ni dodao. Podatke uzima sa forme izbor. Trebas tamo dodati polja i onda mozes dodati i u kodu. Ostavio sam pomjerljive markere zato sto u nekom gradu imas vise firmi. Opet da napomenem da bi mogao popisati geografsku duz. i sirinu i onda bi mogao marker staviti na zgradu u kojoj se nalazi firma i onda bi markeri trebali biti ne pomjerljivi. Za sad je ovo jos amaterski. Hehe duzan si mi jos pola stuba.
Prilozi: Google Maps_zxz2.zip (Velicina datoteke:45.27 KB)

zxz

25.04.2012 13:22

Predmet:Re: Access i GoogleMaps

Kolicinu i naziv proizvoda nemas uovdje pa nisam ni dodao.
Podatke uzima sa forme izbor.
Trebas tamo dodati polja i onda mozes dodati i u kodu.
Ostavio sam pomjerljive markere zato sto u nekom gradu imas vise firmi.
Opet da napomenem da bi mogao popisati geografsku duz. i sirinu i onda bi mogao marker staviti na zgradu u kojoj se nalazi firma i onda bi markeri trebali biti ne pomjerljivi.
Za sad je ovo jos amaterski.

Hehe duzan si mi jos pola stuba.

Prilozi:
Google Maps_zxz2.zip (Velicina datoteke:45.27 KB)

pmiroslav	25.04.2012 14:45
Predmet:Re: Access i GoogleMaps U svakom slučaju ja tebi dugujem cijeli dalekovod koliko si mi do sada pomogao. Å to se tiće količine i naziva proizvoda izgleda nisi pogledao moj zadnji primjer koji sam poslao jer tamo to ima. Ali evo primjenio sam to u tom mom izmjenjeno slučaju pa ću ga prikvačiti. forma WWW otvara se sa 'frmGdjeJeProdan' Sada je to vrlo krasno, jedino je joÅ¡ problem Å¡to mi ne prikazuje viÅ¡e firmi u jednom gradu. Ti kaÅ¾eÅ¡ da si ostavio promjenjive markere pa se nadam da to nije teÅ¡ko popraviti. U tablici tblPartneri sam dodao geografsku Å¡irinu i duÅ¾inu (ali tu me neÅ¡to zeza ja upiÅ¡em 45,327706, a u tablici se zaokruÅ¾i na 45 ) probao sam razne formate broja i uvjek isto)
Prilozi: GoogleMapsMP_1.rar (Velicina datoteke:55.53 KB)

pmiroslav

25.04.2012 14:45

Predmet:Re: Access i GoogleMaps

U svakom slučaju ja tebi dugujem cijeli dalekovod koliko si mi do sada pomogao.

Å to se tiće količine i naziva proizvoda izgleda nisi pogledao moj zadnji primjer koji sam poslao jer tamo to ima. Ali evo primjenio sam to u tom mom izmjenjeno slučaju pa ću ga prikvačiti.
forma WWW otvara se sa 'frmGdjeJeProdan'
Sada je to vrlo krasno, jedino je joÅ¡ problem Å¡to mi ne prikazuje viÅ¡e firmi u jednom gradu.
Ti kaÅ¾eÅ¡ da si ostavio promjenjive markere pa se nadam da to nije teÅ¡ko popraviti.
U tablici tblPartneri sam dodao geografsku Å¡irinu i duÅ¾inu (ali tu me neÅ¡to zeza ja upiÅ¡em 45,327706, a u tablici se zaokruÅ¾i na 45 ) probao sam razne formate broja i uvjek isto)

Prilozi:
GoogleMapsMP_1.rar (Velicina datoteke:55.53 KB)

zxz	25.04.2012 15:34
Predmet:Re: Access i GoogleMaps Citat: U tablici tblPartneri sam dodao geografsku Å¡irinu i duÅ¾inu (ali tu me neÅ¡to zeza ja upiÅ¡em 45,327706, a u tablici se zaokruÅ¾i na 45 ) probao sam razne formate broja i uvjek isto) Vjerovatno si uzeo format broj ali integer a integer je cio broj. Uzmi bar single i sve ce biti uredu. Citat: Sada je to vrlo krasno, jedino je joÅ¡ problem Å¡to mi ne prikazuje viÅ¡e firmi u jednom gradu. Pokazuje ali posto su kordinate od grada te su iste onda su markeri jedan preko drugao. Zato sam napravio pomjerljivo da mozes vidjeti ispod i drugu firmu. Hehe to sam probao na LIPOVac pa zakljucio da ima lipovac i u srbiji pa sam ukljucio u pretragu i drzavu. Eto nesto saznah. Dva mjesta istoga naziva u srbiji i u hrvatskoj.

zxz

25.04.2012 15:34

Predmet:Re: Access i GoogleMaps

Citat:

U tablici tblPartneri sam dodao geografsku Å¡irinu i duÅ¾inu (ali tu me neÅ¡to zeza ja upiÅ¡em 45,327706, a u tablici se zaokruÅ¾i na 45 ) probao sam razne formate broja i uvjek isto)

Vjerovatno si uzeo format broj ali integer a integer je cio broj.
Uzmi bar single i sve ce biti uredu.

Citat:

Sada je to vrlo krasno, jedino je joÅ¡ problem Å¡to mi ne prikazuje viÅ¡e firmi u jednom gradu.

Pokazuje ali posto su kordinate od grada te su iste onda su markeri jedan preko drugao.
Zato sam napravio pomjerljivo da mozes vidjeti ispod i drugu firmu.
Hehe to sam probao na LIPOVac pa zakljucio da ima lipovac i u srbiji pa sam ukljucio u pretragu i drzavu.

Eto nesto saznah.
Dva mjesta istoga naziva u srbiji i u hrvatskoj.