[ miki987 @ 27.02.2012. 15:10 ] @
Zdravo svima na forumu, do sada nisam posecivao ovaj podforum obzirom da sam svo svoje znanje iz programiranja usmeravao na offline bazu kroz access. Medjutim kako me sve ovo vise zanima a mali programcic postao malo veci zeleo bih da se prebacim na mysql. Imam svega malo znanja sto se tice mysql-a i baratanja sa bazama na serveru.Imam nekoliko kratkih pitanja pa se nadam da ce mi neko pomoci i uputiti me na najbolje (srpske) tutorijale kako Vas ne bih davio za svakakva pitanja:

1.MYSQL je npr baza koja se podigne na nekom racunaru (XAMPP, Appache ...) ?
2.Do sada sam za konektovanje na .mdb bazu koristio sledeci SQL upit

Code:

Public conn As New ADODB.Connection
Public rs As ADODB.Recordset


Public Sub openconn()
   conn.Provider = "Microsoft Jet 4.0 OLE DB Provider;Data Source=" & App.Path & "\baza_program.mdb" & ";Jet " & "OLEDB:Database Password=pass"
   conn.Open
   End Sub

...

SQL = "SELECT * FROM tablica WHERE polje='" & Text1.Text & "' ORDER BY redni_broj DESC;"



kako sad npr. sve ovo treba da glasi u MYSQL-u

3.Da li postoji neko resenje da se Access baza sa podacima prebaci na server?
4.Da li se programiranje za .mdb i mqsql razlikuje samo u upitiima ili jos u necemu?
5.I jos jedno pitanje, nisam bas siguran da je po default-u instalacija mysql-a sa ovim podacima ovde, da li je moguce da sam skinuo neku instalaciju koja u sebi ima vec neku bazu, otvorene portove...obratite paznju na strelicu?
[ bogdan.kecman @ 27.02.2012. 16:51 ] @
1. da
2. pretpostavljam da je ta gadna sintaksa visual basic, pogledaj: http://www.youtube.com/watch?v=sVaY6T0WA48
3. da
4. da
5. ti si skinuo neki wamp ili tako nesto i tu si dobio mysql, bolje skini mysql direktno sa http://dev.mysql.com/downloads/
strelica ti pokazuje na performance_schema, to je interna mysql baza iz koje mogu da se izvade neke korisne informacije, isto kao i information_schema. Uz mysql klasicno dolazi mysql sema u kojoj su useri, stored procedure, trigeri i slicno i test sema koja je prazna, ti imas jos i phpmyadmin semu koju je instaliraoi taj paket koji si instalirao koja sluzi da bi phpmyadmin radio kako treba


koristi google, to ti je prijatelj, mysql je najrasprostranjenija baza na svetu, ne postoji problem na koji neces naci odgovor prostim pitanjem na google-u
[ miki987 @ 27.02.2012. 18:51 ] @
4. odgovor da, da li se razlikuje ili ne?
pitam najvise zbog prelaska na MYSQL

sledece, sto se tice strelice mislio sam na sve stavke sa leve strane ali ok sad kontam da je to u sklopu insalacije

takodje, dao si mi link za vb.net, ja radim u vb6

moze li konkretnije, da mi ispises nacin na koji da se prosto povezem na bazu i izvrsim neki upit, ili ako ti je lakse daj mi neki link za primer jer ja pretrazih sve zivo i nista da nadjem, a ako i nadjem onda prosto ne radi...ne kapiram uopste kako sve funkcionise...
[ vbbojan @ 27.02.2012. 20:29 ] @
Ili nisi tražio, ili ne razmeš engleski ...
Internet je preplavljen materijalima na temu koja te zanima.

http://lmgtfy.com/?q=vb6+mysql

Imaš tutoriala, videa, šta hoćeš...
Glupo je da ti ovde izmišljamo toplu i prepisujemo po milioniti put jedno te isto.

Pogledaj malo...

A onda se vrati ovamo sa konkretnim primerima koda koji ti ne radi.
Tu već možemo pomoći.

Pored toga, dali si instalirao ODBC Connector za MySQL?
Ako nisi: http://dev.mysql.com/downloads/connector/odbc/

Pozdrav

[ bogdan.kecman @ 27.02.2012. 20:44 ] @
4. da razlikuje se u mnogo cemu

NE, NEMOJ DA KORISTIS ODBC, koristi nativni .net konektor za mysql: http://dev.mysql.com/downloads/connector/net/

odbc koristi samo u krajnjoj nuzdi
[ miki987 @ 27.02.2012. 21:41 ] @
sad ste sve objasnili. dajte mi neki tutorijal ovako sam se samo pogubio, u vb6 sa access-om stvarno znam dosta toga ovako bas nista, ne mogu ni jedno obicno punjeje u bazu da napravim a vi me spopali sa konektorima...:D
[ bogdan.kecman @ 28.02.2012. 08:09 ] @
da li si kliknuo na bilo koji od linkova koji su ti postavljeni?!
[ vbbojan @ 28.02.2012. 08:57 ] @
@Bogdan
Moram da te ispravim.
Miki987 želi da pristupi MySQL iz Visual Basic 6 koji je dinosaurus i uslovno rečeno je preteča .NET
ODBC konektor je u ovom slučaju jedino rešenje (ako izuzmemo C API aka libmysql).

@Miki987
Niko te nije spopao sa konektorima, bez njih ne može.
Evo i jednog tutoriala: http://www.planet-source-code....p?txtCodeId=66754&lngWId=1

@moderator
Ovo je više tema za VB 6, razmotrite da se prebaci tamo.

Pozdrav





[ bogdan.kecman @ 28.02.2012. 10:44 ] @
aiiiiiiii vb koji nije .not ... to sam zaboravio i da postoji, ako vec mora da koristi taj kvazi jezik onda bolje da koristi novu verziju, iliti .not verziju ..

[ miki987 @ 28.02.2012. 14:05 ] @
jesam kliknuo na link, sat vremena sam jurio zip code za floridu da bi skinuo konektor...eto toliko, sad jos ispadoh degen i da na internet pristupam preko digitrona...
ljudi morate da shvatite da sam totalni pocetnik, ne znam sta je konektor, cemu sluzi, kako se pokrece, zasto se pokrece, kojim redosledom, pazi sad ovo
Citat:
ODBC konektor je u ovom slučaju jedino rešenje (ako izuzmemo C API aka libmysql).


dal je ovo "aka" neki jezik, slovna greska :D nista ne znam

"aiiiiiiii vb koji nije .not" jedna greska i ja opet ucim sta mi govorite

o tome se radi, tu je moj problem, ja kad pomazem na forumu totalnim pocetnicima krenem od samog pocetka i razjasnim sve u detalje i okacim sample u svojoj reziji, stvarno Vam Hvala ali imajte u vidu da ne razumem mysql

:D kako ja da razumem sta ste hteli reci, zato sam mislio da krenem od najobicnijeg tutorijala, za vb6 i access sam ucio kroz tutorijale i tako ga naucio, ali terminima ne baratam i ne znam osnove, moze li neko od vas prosto i najprostije da objasni sledece i necu vas daviti:

1. Kako se povezati na bazu localhost (nije na serveru)
2. Kako da napravim jednu tablicu kao u access-u koja ima polja ID,TEKST
3. Kako da u obicno Text1.Text polje na Form1 napunim tekstom iz baze - polja TEKST
4. Kako da iz Text1.Text nesto dodam,izmenim,brisem iz baze - polja TEKST

Nista vise, meni je to sasvim dovoljno da dalje sam ucim

i jos jedno pitanje, kada skidam ovaj mysql-connector-odbc posto imam win7 64 jel skidam mysql-connector-odbc64bit ili 32, kao i ima li veze koju grzavu (zastavu) biram za skidanje, koja je najbezbednija?

[Ovu poruku je menjao miki987 dana 28.02.2012. u 15:25 GMT+1]
[ djoka_l @ 28.02.2012. 14:23 ] @
Kao prvo, aka je akronim (tj. skraćenica) od izraza na engleskom "also known as" i koristi se kao "ili", ili "takođe i pod nazivom".

1. Odgovor na ovo pitanje zavisi od jezika u kojem pišeš softver. Na tvom prastarom VB6 moraš da koristiš ODBC. Na drugim jezicima instaliraš konektor koji ti daje skup funkcioanalnosti kojim pristupaš bazi.
2. Napraviš tako što iskoristiš komandu (kad već jednom pristupiš bazi) SQL komandom CREATE TABLE. Za sintaksu, pogledaj uputstvo za bazu...
3. Isto kao kad je u pitanju access, a ODBC konekcija.
4. Vidi pod 3.
[ bogdan.kecman @ 28.02.2012. 14:34 ] @
VB6 je star ko biblija, batali ga
u prvom odgovoru od mene imas FILM kako da sve to sto hoces uradis sa VB.NET

imas dzaba VB.NET da skines sa microsoft sajta ( http://www.microsoft.com/visua...-editions/visual-basic-express )

ispratis film i imas sve to sto si hteo ... zato sam te pitao "da li si klikno na link"


[ bogdan.kecman @ 28.02.2012. 14:35 ] @
btw, ako ucis da programiras, uci C# ili C++ ili Java ili neki drugi normalan programski jezik, od VB-a se nes leba najest, ako VB vec znas onda je druga prica ... samo predji na noviji ... sestica je ipak bas bas bajata
[ miki987 @ 28.02.2012. 15:01 ] @
a sta sa programom koji sam napravio :D, hteo sam najpre od vb6 da krenem i naucim osnove kao sto jesam, zatim MYSQL a da onda polako predjem na vb.net. Meni se cini da vi vise gotivite VB.NET zbog vizuelizacije, meni to ne smeta, dosta stvari vezem i za swf sa vb-om, pa tako imam mogucnosti da napravim cudo, npr. imam jedan programcic koji meri temperaturu i zapreminu silosa, hardver je napravio komsija elektronicar a ja vb povezao sa tim, a to se prikazuje u swf kroz analogni satic ... tako da meni vb sasvim odgovara, nego sam bazu sa ovim mojim programom hteo da napravim u mysql-u, da naprvim log i da znam ko se sve konektuje - za pocetak, a kasnije da kompletnu bazu prebacim na server, taj program koriste svega 2 firme, u pitanju je fakturant sa bazom magacina gotovih proizvoda, ali sad vidim da to nije tako jednostavno, koliko vidim ja cu morati i da sav svoj kod, sintakse kao i upite menjam a to je posao...
[ vbbojan @ 28.02.2012. 15:09 ] @
Uf!

Ne znam koji će ti đavo zip code za Floridu i slično.
Za download ne treba nikakva registracija, samo da si pažljivo čitao šta piše na stranicama ...

"aka" je skraćenica od "also known as" ili ti "takođe poznat kao" da si samo malo manje lenj čas posla bi to našao: http://en.wikipedia.org/wiki/Aka

.not = .NET - Bogdan .NET zove "dotnot", jer ga ne vole uopšte. Ko prati lik i delo druga Bogdana i ovaj fourum zna o čemu je reč :)

1.
Sve jedno je gde je baza, samo da znaš gde je, pogledaj primer iz linka koji sam ti ostavio u prethodnom postu.
Kreiranje konekcije ka bazi (iz tutoriala koji sam ti linkovao):

Code:

serverip = "localhost"
port = "3306"
datebasename = "test"
user = "root"
password = "password"

'Creating a new connection, and defineing the variables

Set CNN = New Connection
CNN.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
                      & "SERVER=" & serverip & ";" _
                      & " DATABASE=" & datebasename & ";" _
                      & " PORT=" & port & ";" _
                      & "UID=" & user & ";PWD=" & password & "; OPTION=3"

CNN.Open       'Opening the database


2.
Kako se kreira tabela u MySql vidi na http://dev.mysql.com/doc/refman/5.1/en/create-table.html ili skini neki od GUI alata, na primer http://dev.mysql.com/downloads/workbench/5.2.html ili http://www.sqlmanager.net/products/mysql/manager/ koji ti onda daju Access feeling...
Iz programsko koda rudimentarno bi to bilo ovako:
Code:

sqlcommand = "CREATE TABLE `mytest` (`id` int(10) unsigned NOT NULL, `text` CHAR(20) NOT NULL DEFAULT '', PRIMARY KEY (`id`)) ENGINE=InnoDB"
CNN.execute sqlcommand


3.
Ako si znao iz Accessa onda bi trebalo da zanaš i odavde. ADO upravo tome služi da ti unificira rad sa (uslovno rečeno) bazama podataka.

Code:

Set rs = New Recordset 
sqlcommand = "SELECT * FROM mytest"
rs.Open sqlcommand, CNN

Ovo ti daje recordset napunjen podacima iz datog upita. Ako si savladao pristup Accessu, dalje sa recordsetom bi trebalo da znaš ...

4.
Tu već imamo začkoljicu.
Naime ja sam svojevremeno radio sa ODBC 3.5.1 i on nije dobro sarađivao sa ADO tako da sam sve CRUD operacije izvršavao sklepavanjem
SQL izraza u string i onda ga direk slao serveru na izvršavanje.
(ovo btw nije pametno sa stanovništa bezbednosti - zašto vidi na http://en.wikipedia.org/wiki/SQL_injection)
Ne znam kako je sa ODBC serijom 5 no u svakom slučaju to bi bio nešto ovako:
Code:

sqlcommand = "INSERT INTO mytest (`id`, `text`) VALUES ( " & cint(val(text1.text))  & ", " &  text2.text & )"
sqlcommand = "UPDATE mytest SET `text` = " & text2.text & " WHERE `id`=" & cint(val(text1.text))
sqlcommand = "DELETE FROM mytest WHERE `id`=" & cint(val(text1.text))

'A onda posaljes komandu serveru:
CNN.Execute sqlcommand

Ružne li sintakse ... možda i nije skroz tačna, sve bijem iz glave, a davno sam se mlatio sa ovim.

Pozdrav,
[ bogdan.kecman @ 28.02.2012. 15:12 ] @
niko ne gotivi vb.net, to je kvazi programerski jezik, kao sto rekoh leba se od toga tesko ko najeo ..

vb.net bi trebalo da moze da importuje vb6 projekat

ako ucis da programiras, vb6 je mnogo pogresno mesto od koga pocinjes, .net je isto daleko od mnogo dobrog mesta za pocetak al tu ces bar mozda sutra zaraditi neki dinar, ali uci neki programski jezik, c# ma koliko je .net, jeste programski jezik (za razliku od vb-a koji ne znam kako bih nazvao a da me forum ne cenzurise)

no, ako oces da koristis sesticu, slobodno, moraces samo kako ti kolega rece da ides kroz odbc .. i za to imas milion primera ..

http://bit.ly/yWMJ37

[ miki987 @ 28.02.2012. 15:28 ] @
e ovo je vec jasnije, sa accessom perfektno znam sve, koristim ado konekciju tako da nece biti problema, mada ako se javim sa neki prostim pitanjem za...ciju ostavite za drugi put :D

za mene je C jezik spansko selo, lakse mi je da radim sa programima gde ima forme pa ono sto napravis mozes u svakom trenutku i da vidis, cini mi se ili je mozda sve sto znam o Cjeziku crni ekran, tastatura i pisanje koda tako da je ovo dovoljno sto znam, pored Flash-a, Html-a malo Java sript-a, sasvim dovoljno da uzivam u ovome, o novcu i zaradi ne razmisljam...a jos kad se uzme u obzir da engleski ne znam niti sam ga ucio ovo je dovolno, otud i ono "aka"

jos samo jedno pitanje,

kada preuzmem ovaj konektor sa linka koji si mi dao 3.5.1 i zapocnem instalaciju na Install u ODBC32 u CP na ADD nema konektora, a kad preuzmem konektor 5.1.1 njega ima, koja je razlika i da li se u tom slucaju (novijeg konektora) menja samo

Code:
"DRIVER={MySQL ODBC 3.51 Driver};" 

u
Code:
"DRIVER={MySQL ODBC 5.1 Driver};" 


i u da li je prevelika razlika u Visual Basic 2010 Express i VB6
[ anon115774 @ 01.03.2012. 13:10 ] @
Ovo mi zvuci kao da neko pokusava da se bavi medicinom ali ne zna latinski i nikad ga nije ucio.
[ miki987 @ 01.03.2012. 23:32 ] @
u redu bitno da ti sve znas, ja sam do pre 2god imao pentium III i sasvim slucajno cd vb6, nisam znao ni cemu sluzi, engleski nisam ucio nikada, i eto vidis nista ne znam, pa se trudim da nacuim, od skole imam samo srednju zanatsku za cnc masine za koje pisem programe i odrzavam ih i opet nista ne znam, tebi svaka cast ako su tvoji mogli da ti priuste tecajeve latinskog i engleskog i skolovanje na fakultetima ja sam moj skroman zanat ispeko zahvaljujuci ovakvim ljudima, i sve dok je takvih ovaj forum ima da traje
[ anon115774 @ 02.03.2012. 10:54 ] @
Pentium? Sta je to? Kada sam ja pocinjao naziv "Pentium" nije ni postojao :)

Ako ti je ono "987" u nick-u godina rodjenja onda izguglaj malo sta je sve od hardvera i softvera postojalo kada si ti imao 2-3 godine. Mogli smo samo da sanjamo o nekim stvarima koje postoje danas, racunari su kostali kao malo manji automobil, engleski smo ucili u skoli kao i svi ostali (ne, nije bilo google translate), informacije smo dobijali jedino iz knjiga koje smo razmenjivali medjusobno (ne, nije bilo foruma gde bi se nesto moglo pitati niti torrenta gde bi se mogle naci knjige u elektronskom obliku i to jos besplatno), nije bilo programskih jezika koji su imali IDE gde se samo kliktalo misem...

Vidim da se mnogo vredjas cim ti neko nesto kaze pa sam zato reagovao. Spusti se malo na zemlju i umesto da na svako pitanje/predlog reagujes izjavama kako ti nisi debil ili sta vec malo se uozbilji i zagrej stolicu. Niko ovde nije dosao da te vredja nego da ti pomogne tako da nema potrebe da na svaku poruku reagujes kao da te neko bode u oko.
[ nkrgovic @ 02.03.2012. 11:59 ] @
@Informer: Bio je news. Bar sam ga ja koristio.... nntp i tin kao klijent. Bilo je vise ljudi voljnih da pomognu a manje trolova.

@miki: Bogdan je u pravu - ni VB6 nije neki jezik ni MySQL nije baza za GUI i kliktanje. Ili se drzi toga, ili, ako radis web, probaj da naucis ili C# uz .njet ili npr. PHP to je popularan jezik koji lepo radi sa MySQL-om, tutoriala ima dosta na inernetu. Verovanto ima neki i na srpskom (nisam trazio), ali razmisli da malo ucis i engleski. Kapiram ja da je tebi ovo hobi / zabava, ali opet, nema niko vremena da tebi sve prevodi.
[ miki987 @ 02.03.2012. 14:38 ] @
Tamo odakle ja dolazim, do pre dve godine nije bilo ni telefona, ako cemo da razmenjujemo znanja slobodno dodji da samnom cistis snega 5km da bi dosao do prve poste :D. Ne vredjam se niti pokusavam da nekog omalovazavam, cenim ljude koji su ucili skole, priznajem ja nisam, ne zato sto nisam zeleo vec sto nisam imao kako da se finansiram, ne gadjam visoko vec samo tako deluje kad pisem, nismo mi sa zanatom drvosece kako nas neki zamisljaju pa prebacuju to sto "nismo videli sveta i ucili engleski". Kad sam prvi put svojim zaradjenim parama od sankerisanja kupio ovu masinu i otisao kod roditelja, znas sta, moji roditelji su pomislili da se drogiram, 15 dana sam ja njih ubedjivao da mi je to neophodna stvar za posao...sada zivim u okolini Bg-a, odlicno poznajem svoj posao u oblasti masinstva, toliko da dva puta mesecno idem u Sloveniju o trosku firme u kojoj radim na odrzavanju masina, ima i tamo ljudi ali eto gazda zeli mene, u mojoj skoli se ucio Ruski jezik ali skoro sve sto pise na engleskom ja umem da prevedem - ukapiram, ne uz pomoc translate-a...kako e to ne mogu da ti objasnim
Kapiram ja i da je nekome tesko da objasnjava elementarne stvari, ali seti se ti tvojih pocetaka... u svakom slucaju Hvala na savetu Hvala i ovima koji mi pisu na pvt
[ nkrgovic @ 02.03.2012. 14:44 ] @
Cuj, miki, tutoriali imaju uz sebe i kod... Skines, pokrenes, vidis sta radi. Onda lakse razumes i tekst. Ako iole natucas engleski - dovoljno je, nije to citanje teskih knjizevnih dela. Samo mislim da je VB6 los izbor, to je sve. To je dobronameran savet, ne kritika.
[ miki987 @ 02.03.2012. 14:56 ] @
vb6 za desktop aplikaciju uz access skines pokrenes i radi, ako ima gresku ukaze ti na problem pa ga resavas,za mysql skines pokrenes i opet greska, ukapiram da treba neka baza dal u localhost-u ili na serveru nebitno...e sad access kliknes na Office next,next,next i instalacija gotova, napunis je tabelom i to je to, a mysql prvo ne znam odakle da je skinem, kako da je instaliram, kako da je povezem...zato sam dosao i ovde...ali posto je tema otisla skroz u drugom pravcu sad vise nije ni bitno

[ SpizaGenije @ 06.03.2012. 18:19 ] @
@ Bogdan i ostali... Nemojte mi trolovati .net platformu (pliz) :)

@ Miki

zbog tebe sam otišao na vb6 forum i jedva iskopao nešto... trebao si samo malo proguglati po elitesecurity.org i sigurno bi nešto našao... neko je bio u pravu kada je rekao da tvoje pitanje nije za ovde, nego za vb6... :D

ali da ti na brzaka pomognem...

1. skineš prvo ODBC konektor (bogdane, ne može mysql net konektor, ovo je mnogo matoro :D )
možeš skinuti ODBC 3.51 ili 5.1, kako ti volja odavde
-- instaliraš ga ;)

2. skineš MySQL 5.5 server odavde ... (za razliku od 5.1, mnogo lepo se vrti na windozi, a i bogdan će ti reći da sam u pravu)
-- lepo i to instaliraš (ali skini (jedan mnogo lep) .msi za windoze - da se ne za****š :D )

3. skineš i jedan lep GUI da se igraš skoro kao u aksesu ;) (MySQL Workbench)

4. ovo ide pod broj jedan, ali me mrzi da sada umećem... Skineš i MySQL refman... jedan mnogo lep "tutorijal" koji ti je sve objasnio na 2k i više strana... :)


eh... a sada - kôd:


1. kreiraš jedan modul i u njega strpaš ovo

Code:

Public conn As New ADODB.Connection
Public rs As New ADODB.Recordset
Public rs1 As New ADODB.Recordset
Public rs2 As New ADODB.Recordset
Public mSQL As String
Public mSQL1 As String
Public mSQL2 As String

Sub mSQL_conn()
Set conn = New ADODB.Connection

conn.ConnectionString = "DRIVER={MySQL ODBC 5.1 Driver};" & "SERVER=127.0.0.1;" _
   & "DATABASE=ime_tvoje_baze;" _
   & "UID=root;" _
   & "PWD=tvoja_sifra; OPTION=3;"

conn.Open
End Sub

Function mBaza_pregled(mSQL)
Set rs = New ADODB.Recordset
        rs.ActiveConnection = mSQL_conn
        rs.CursorLocation = adUseClient
        rs.CursorType = adOpenDynamic
        rs.LockType = adLockOptimistic
        rs.Source = mSQL
        rs.Open
End Function

Function mBaza_pregled1(mSQL1)
Set rs1 = New ADODB.Recordset
        rs1.ActiveConnection = mSQL_conn
        rs1.CursorLocation = adUseClient
        rs1.CursorType = adOpenDynamic
        rs1.LockType = adLockOptimistic
        rs1.Source = mSQL1
        rs1.Open
End Function

''// ... i dalje za rs2, rs3...



Dalje, na formi projetka, radiš sledeće kada želiš da podatke prikazuješ u FlexGrid-u:

Code:

Dim trazi_vozilo As String, sifra As String, i As Integer, t As Integer


trazi_nalog = txtReg_br.Text & "%"   ''// trazi_vozilo ti je promenljiva koja odgovara vrednostima iz txt boksa sa desne strane znaka jednakosti... % je znak iz 'SQL sintakse i znači da će prikazivati sve podatke kojima su početna slova ona koja unosiš u taj txt boks

Call mSQL_conn   ''// ovde pozivaš konekciju na bazu iz gore navedenog modula
mSQL = "Select * from tbl_vozilo where vzlID like '" & trazi_nalog & "'order by vzlID"   ''// ovo ti je SQL upit i po tim kriterijumima pretražuješ bazu
Call mBaza_pregled(mSQL)  ''// ovde pozivaš f-ju iz modula a kao vrednost mSQL promenljive uzimaš ovaj gornji string (mSQL= ............)

If mPostojeciNal(trazi_nalog) = False Then     ''// Funkcija koja proverava da li postoji podatak u bazi (kôd ti je dole ispod)
    MsgBox "Nalog broj " & trazi_nalog & " nije registrovan u bazi! Proverite broj naloga.", 48, "O B A V E S T E NJ E!"
    txtReg_br.SetFocus 
Else:    
Me.fgVozilo.Clear  ''// ovde čistiš FlexGrid (on se kod mene zove fgVozilo... ti ga nazovi kako hoćeš  :)
    fgVozilo.Rows = 0
   
    fgVozilo.ColWidth(0) = 1000  ''// ovde mu definišeš broj kolona i njihovu širinu
    fgVozilo.ColWidth(1) = 1000  ''// ja sam ih definisao šest
    fgVozilo.ColWidth(2) = 1000
    fgVozilo.ColWidth(3) = 1000
    fgVozilo.ColWidth(4) = 1000
    fgVozilo.ColWidth(5) = 1000
    
On Error GoTo greska   ''// usled greške, prebacuje ti se na predposlednju liniju kôda i prikazuje ti MsgBox sa opisom greške koja ti se pojavila
    For i = 1 To rs.RecordCount
        t = Chr(9)    ''//  Chr(9) ti je tab vrednost tj, nakon svake unesene vrednosti prelaziš u sl polje
        sifra = rs("vzlID")  ''// rs("vzlID") vzlID ti je kolona u bazi i td.
        fgVozilo.AddItem sifra + t + rs("model_voz") + t + rs("vrsta_voz") + t + rs("tezina_voz") + t + rs("nosivost_voz")  ''// ovde definišeš gde u FlexGrid-u 
''// ubacuješ vrednosti kojih polja
        rs.MoveNext
    Next i
End If

    Exit Sub
    
greska: MsgBox ("Greska broj " & Err.Number & vbCrLf & Err.Description), 48
End Sub



Ovo ti je funkcija za proveru postojanja zapisa u bazi (nekada i to zatreba :) ):

Code:

Private Function mPostojeciNal(trazi_nalog As String) As Boolean   ''// ova funkcija ti proverava postojanje zapisa po određenom kriterijumu
                                                                                       ''// i izbegava pojavu greške u programu
Call mSQL_conn
mSQL = "SELECT * FROM tbl_vozilo  WHERE vzlID LIKE '" & trazi_nalog & "'"
Call mBaza_pregled(mSQL)
    
    If rs.EOF = True Then   ''// ovaj deo kôda proverava da li postoji zapis u bazi... ako ne postoji onda odrađuje naredne tri linije kôda
        rs.Close
        Set rs = Nothing
        Exit Function
    End If
    
    If trazi_nalog = rs("vzlID") Then
        mPostojeciNal = True    ''// True - postoji zapis u bazi
    Else
        mPostojeciNal = False   ''// False - ne postoji zapis u bazi
    End If
    
End Function


eto ti, pa se dalje sam snalazi... meni je ovo vrtilo bez problema godinama (na MySQL 5.1 i ODBC 3.51, ali vrti mnogo bolje na MySQL 5.5 i ODBC 5.1 ;) )

PS. neko ti je predlagao da pređeš na VB.net... i ja ti to isto kažem... beži dok si još iole mlad...
.net platforma ti je dobra, pre svega što ti se VB6 i VB.net sintaksa ne razlikuje mnogo (bar 40%), a ja sam neke delove kôda prepisivao po principu copy/paste, a neke po istom principu i malo dorade i opet mi vrtilo bez problema... :)
Naravno, neke delove kôda ćeš morati ispočetka da pišeš (jovo - nanovo, ali bože moj!)

druga dobra stvar ovde je što ti se VB.net code spušta prvo na Intermediate Language (MSIL) , pa pa tek onda na nativni kôd... što će reći da sve aplikacije pisane u VB.net-u možeš da konvertuješ u C#, C++ ili Phyton i obratno... MSIL je tu konačno pomirio ta četiri PL-a!

eto ti... pa se vežbaj... ako gde zapne, potraži me u PP ili na nekom od .NET podforuma :)

Pozdrav!
[ miki987 @ 10.03.2012. 13:16 ] @
dzigi mi je izasao u susret pa mi je sve potanko objasnio, nista od ovoga ne mogu da podignem na win7 64, trazi mi net framefork stariji od 2jke, instaliram 4-ku priajvljuje silne probleme, imam neki problem sa OS*om cim ga sredim nece biti problema, i javljam se, problem nas pocetnika i vas profesionalaca je u tome sto vi idete rutinski, instaliraj to i to i kraj, npr. ja sam se susreo sa najmanje 10 problema sa kojim se nosio moj win7, trazio mi silne .dll fajlove i zato nisam uspeo sve ovo da odradim. javljam se za nedelju dana pa vas obavestavam, do tad SpizaGenije ako ti nije problem, mozes li samo da mi ovo za flexgrid ostavis kod za ado i listview
[ Shinhan @ 13.03.2012. 08:35 ] @
Pošto MySQL (sa mysql.com) sigurno radi na Win7, onda je problem sigurno do prastarog VB6, tako da ovo više nije thread za MySQL forum.
[ SpizaGenije @ 15.03.2012. 08:10 ] @
Kao što reče Shinan, to što tražiš za vb6 je za vb6 forum...
a šro se frejmworka tiče... sigurno ne možeš da instaliraš Workbench, a on ti radi na 3.5 platformi... ;)