Ja koristim Apache Triad, zato što je to PHP MySQL server...
Kada ga budeš instalirao, na firewall-u oslobodi 3306 port ili jednostavno isključi firewall :) zato što SQL serveri koriste 3306 i 80 portove... (napomena - na windows visti ne možeš pokrenuti server jer neka od vistinih aplikacija već koristi port 80, ne znam koja jer se ne bakćem vistom... windows 7 i xp su ok)
takođe, moraš da instaliraš i ODBC driver (ja koristim verziju 5.1.6, pa je možeš i ti skinuti /ili ver 3.51 /)
kako kreirati bazu i tabele ćeš naučiti na onom sajtu koji sam ti "nalepio" u prethodnom odgovoru...
Što se tiče VB kôda, sve ostaje isto osim modula za konekciju, gde umesto
Code:
Sub mSQL_conn ()
Dim AdoDatabasePath As String
Dim AdoPassword As String
AdoDatabasePath = "tvoja_putanja_do_baze"
AdoPassword = "tvoja_sifra_za_bazu"
If konekcija.State = 1 Then konekcija.Close
konekcija.Open "Provider=Microsoft.Jet.OLEDB.4.0;Password='';" & _
"User ID=Admin;Data Source=" & AdoDatabasePath & ";" & _
"Jet OLEDB:Database Password='" & AdoPassword & "'"
End Sub
Sub mSQL_conn ()
Dim AdoDatabasePath As String
Dim AdoPassword As String
AdoDatabasePath = "tvoja_putanja_do_baze"
AdoPassword = "tvoja_sifra_za_bazu"
If konekcija.State = 1 Then konekcija.Close
konekcija.Open "Provider=Microsoft.Jet.OLEDB.4.0;Password='';" & _
"User ID=Admin;Data Source=" & AdoDatabasePath & ";" & _
"Jet OLEDB:Database Password='" & AdoPassword & "'"
End Sub
kucaš
Code:
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
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
pozz... i javi ako gde zapneš :)
Some people, when confronted with a problem, think: "I know, I'll use regular expressions."
Now they have two problems!
-Jamie Zawinsky
Now they have two problems!
-Jamie Zawinsky