[vb6] Ado

[*D-Planet*]

Come imposto con vb6 la connessione ad un db Access 2000?
per fare il recordset invece?

[Kylnas]

Originariamente inviato da *D-Planet*
Come imposto con vb6 la connessione ad un db Access 2000?
per fare il recordset invece?

Dim m_Conn as Connection, re as ADODB.Recordset
Dim cnnSTR as string 'stringa di connessione ADO

Set m_Conn = New Connection
m_Conn.CursorLocation = adUseServer
m_Conn.Open cnnSTR

Set rs = New Recordset
rs.Open sSQL, m_Conn, adOpenStatic, adLockReadOnly

Questo è un esempio.

[*D-Planet*]

Originariamente inviato da Kylnas

Dim m_Conn as Connection, re as ADODB.Recordset
Dim cnnSTR as string 'stringa di connessione ADO

Set m_Conn = New Connection
m_Conn.CursorLocation = adUseServer
m_Conn.Open cnnSTR

Set rs = New Recordset
rs.Open sSQL, m_Conn, adOpenStatic, adLockReadOnly

Questo è un esempio.

la stringa di connessione al database sarebbe cnnSTR?
come la salvo? cnnSTR = ".....?"

grazie ancora mille

[Kylnas]

Originariamente inviato da *D-Planet*
la stringa di connessione al database sarebbe cnnSTR?
come la salvo? cnnSTR = ".....?"

grazie ancora mille

Questo è un esempio per access, ma se fai una ricerca su google trovi molte spiegazioni.

cnnSTR = "PROVIDER=MSDataShape;Data PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & m_PathDB

m_PathDB rappresenta il path del file *.mdb