Moze li mi neko samo reci kako da napravim pomocu DAO konekciju na SQL server?
Pristup SQL serveru DAO konekcijom
Zaključano
Zakačeno
Na koji server mislis?
Citat:
PR.VB.OR.00.MS.CR.01: Na koji server mislis?
Mozda je mislio na SQL server (ne pitaj me odkud mi to)
http://www.vbexplorer.com/VBEx.../Database_Beginner_ADO_DAO.asp
Potpis
SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
Zašto baš DAO, ADO je po meni elegantniji.
Dava vrač - pogađač.
Kako si znao da misli na SQL server?
Dava vrač - pogađač.
Kako si znao da misli na SQL server?
Sta znam, DAO je meni laksi, naucio sam na njega i sve mi ok radi, pa nemislim nesto mjenjati :). Da, mislio san na SQL server.
Hvala za primjer!
Hvala za primjer!
Neko je pitao na koji server mislis ... sto izgleda nije ozbiljno shvaceno.
Postoje 2 sql servera koji se danas najcesce koriste i to su
MySQL server (open source) i MS SQL server by M$
I ja mislim da je bolje da se koristi ADO u VB-u ...
Za povezivanje komponente sa serverom treba da se napravi ConnectionString , koji se razlikuje od servera do servera.
Pogledaj http://www.sqlstrings.com/
Postoje 2 sql servera koji se danas najcesce koriste i to su
MySQL server (open source) i MS SQL server by M$
I ja mislim da je bolje da se koristi ADO u VB-u ...
Za povezivanje komponente sa serverom treba da se napravi ConnectionString , koji se razlikuje od servera do servera.
Pogledaj http://www.sqlstrings.com/
Potpis
HomePage http://www.eurora3d.com
Nebojša u pravu si, ali nekako se podrazumeva, bar kod ljudi sa kojima sam ja sarađivao, da se "SQL Server" odnosi na Microsoft-ov SQL Server verovatno zbog toga što kad god se misli na MySQL jednostavno se naglašava ovo "My", jer mu je u imenu. 
Zapravo postoji puno SQL Servera, jer je to opšti pojam za svaki DBMS koji ima implementiran SQL jezik.
Preporučujem da pogledate i connectionstrings.com.
Zapravo postoji puno SQL Servera, jer je to opšti pojam za svaki DBMS koji ima implementiran SQL jezik.
Preporučujem da pogledate i connectionstrings.com.
Pitanje bi imalo smisla da je covjek pitao na koji SQL server mislis, ali ovako...
I to sto stefanpn rece, kad se kaze SQL svi mi znamo da se misli na MS SQL. Jezik je ziva stvar koja nastoji sebe uprostiti.
I to sto stefanpn rece, kad se kaze SQL svi mi znamo da se misli na MS SQL. Jezik je ziva stvar koja nastoji sebe uprostiti.
Potpis
SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
Hvala ljudi, sve u svemu ste shvatili da sam mislio na MS SQL server, inace bi rekao MySQL. Al kad ste tako raspolozeni, onda bi mogao jos da pitam za vasa iskustva sa DB serverima. Koji ste najcesce koristili i koji smatrate najboljim u kombinaciji sa VB6. Hvala!
Normalno svi znamo sta je ... samo sam hteo da kazem da pitanje (mozda) i nije bilo tako plitko
djpero.84 MS SQL server :) sa VB-om
djpero.84 MS SQL server :) sa VB-om
Potpis
HomePage http://www.eurora3d.com
MySQL, njega koristim uz sve sto mi padne pod ruku.
VB, VB.NET, PHP...
Samo skines ODBC connector za VB6 ili dirver za VB.NET (radi cak i za Windows CE uredjaje) i milina, nikakav "ne resiv" problem mi nije naisao.
http://www.mysql.com/products/connector/
VB, VB.NET, PHP...
Samo skines ODBC connector za VB6 ili dirver za VB.NET (radi cak i za Windows CE uredjaje) i milina, nikakav "ne resiv" problem mi nije naisao.
http://www.mysql.com/products/connector/
Mozes li jedan mali primjer koda konekcije na server? Mislim na DAO primjer.
Nije da nisam trazio kako i pokusavao. Ja sam dosad, kad sam radio sa Access bazom, definisao DAO.Database i DAO.Recordset. Predpostavljam da umjesto database treba Connection i staviti string, medjutim ne uspijeva mi.
Nije da nisam trazio kako i pokusavao. Ja sam dosad, kad sam radio sa Access bazom, definisao DAO.Database i DAO.Recordset. Predpostavljam da umjesto database treba Connection i staviti string, medjutim ne uspijeva mi.
Imas vec gotovih primera na forumu, cak mislim da ima u nekoj TOP temi
izmenjeno 1 put, poslednji put djpero.84 13.05.2009. u 13:01
Izmene poruke
- djpero.8413.05.2009. u 13:01zapis iz teksta poruke
Nasao sam dosta primjera DSN-less konekcija i ostalo. Pristupam serveru ok, medjutim imam problem pri promjeni sloga. U opcijama rekordseta nemam EDIT. Jedino opet sa Query:
Kad radim .AddNew, nikako da update-ujem kolonu sa text tipom podataka? Jedino sam uspio to sa :
P.S. ovdje se vidi komentarisno zatvaranje recordseta, jer mi prijavljuje da ne moze da zatvori nesto sto nije ni otvoreno?!
Sta ustvari znaci tip kursora i tip zakljucavanja?
Code:
Set rs = New ADODB.Recordset
sql = "UPDATE pero.gvero SET ime='rt8888' WHERE prezime = 'tuiyuoi67t8o'"
rs.Open sql, mc, adOpenKeyset, adLockOptimistic, adCmdText
Set rs = New ADODB.Recordset
sql = "UPDATE pero.gvero SET ime='rt8888' WHERE prezime = 'tuiyuoi67t8o'"
rs.Open sql, mc, adOpenKeyset, adLockOptimistic, adCmdText
Kad radim .AddNew, nikako da update-ujem kolonu sa text tipom podataka? Jedino sam uspio to sa :
Code:
Set rs = New ADODB.Recordset
sql = "INSERT INTO pero.gvero(ime,prezime) values ('sdsd','dsd')"
rs.Open sql, mc, adOpenKeyset, adLockOptimistic, adCmdText
'rs.Close
'Set rs = Nothing
Set rs = New ADODB.Recordset
sql = "INSERT INTO pero.gvero(ime,prezime) values ('sdsd','dsd')"
rs.Open sql, mc, adOpenKeyset, adLockOptimistic, adCmdText
'rs.Close
'Set rs = Nothing
P.S. ovdje se vidi komentarisno zatvaranje recordseta, jer mi prijavljuje da ne moze da zatvori nesto sto nije ni otvoreno?!
Sta ustvari znaci tip kursora i tip zakljucavanja?
Evo, uspio sam iskrpiti nekako DAO sa MySql, ali mi stalno prijavljuje pri Update da je ReadOnly:
Code:
Dim ws As Workspace
Dim conn As Connection
Dim queryDef As queryDef
Dim str As String
Dim rs As DAO.Recordset
Dim daoDB As Database
'==================================
Dim str2 As String
Private Sub Form_Load()
Set daoDB = DBEngine.OpenDatabase("test", dbDriverNoPrompt, False, "ODBC;DATABASE=pero;UID=root;PWD=;DSN=test")
End Sub
Private Sub Command1_Click()
'Set rs = conn.OpenRecordset("gvero")
Set rs = daoDB.OpenRecordset("gvero", dbOpenDynaset, dbSeeChanges)
MsgBox rs!ime
rs.AddNew
rs!ime = "'sadfa'"
rs!prezime = "'sadfa'"
rs.Update
rs.Close
End Sub
Dim ws As Workspace
Dim conn As Connection
Dim queryDef As queryDef
Dim str As String
Dim rs As DAO.Recordset
Dim daoDB As Database
'==================================
Dim str2 As String
Private Sub Form_Load()
Set daoDB = DBEngine.OpenDatabase("test", dbDriverNoPrompt, False, "ODBC;DATABASE=pero;UID=root;PWD=;DSN=test")
End Sub
Private Sub Command1_Click()
'Set rs = conn.OpenRecordset("gvero")
Set rs = daoDB.OpenRecordset("gvero", dbOpenDynaset, dbSeeChanges)
MsgBox rs!ime
rs.AddNew
rs!ime = "'sadfa'"
rs!prezime = "'sadfa'"
rs.Update
rs.Close
End Sub