vb6 & access

[michele79]

Salve,sono alle prime armi...sto cercando di fare un piccolo programmino in VB6 client/server che mi permetta di inserire cancellare e visualizzare dati tipo rubrica telefonica,utilizzando access,il problema è il seguente:vorrei accedere al database senza sfruttare l'oggetto DATA del vb,ma solo scrivendo codice!e qui sorge il problema,come devo scriverlo !?qualcuno puo' suggerirmi qualche esempio?
Grazie in anticipo...

:gren: ...avanzate una bevuta !!! :gren:

[ladyBlu]

ciao.
per collegarti a un db devi usare una connessione e dei recordset, che puoi gestire via codice. io ti consiglio di usare ADO.
devi iniziare includendo la libreria di ado:
Menù Progetto --> Riferimenti --> Microsoft ActiveX Data Objects 2.5 Library

intanto fai questo...

[michele79]

ciao!!!
Grazie per l'inizio...ma poi come si prosegue?
Cmq io non ho quella libreria,ne ho una piu vecchia,la 2.1 !va bene lo stesso!?
arigrazie ciao mic!!!

[ladyBlu]

va bene lo stesso.

adesso devi connetterti al database.
puoi utilizzare una sub, come ho fatto io, che richiami nella Load del tuo form, in questo modo:

Private Sub Form_Load()
    Connetti
End Sub

Sub Connetti()

    Dim miaConn As ADODB.Connection
    Dim mioSet As ADODB.Recordset
    Dim miaStringaConn As String
        
    percorsoDb = "" 'qui scrivi il percorso del db, tra gli apici.
    miaStringaConn = "Provider=Microsoft.Jet.OLEDB.4.0;"
    miaStringaConn = miaStringaConn & "Data Source="
    miaStringaConn = miaStringaConn & percorsoDb
    miaStringaConn = miaStringaConn & ";Persist Security Info=False"
        
    Set miaConn = New ADODB.Connection
    Set mioSet = New ADODB.Recordset
        
    miaConn.ConnectionString = miaStringaConn
    ...            
End Sub

[michele79]

Grazie mi sei stata di grande aiuto !!!
ora funzia!!!:gren: :gren: :gren: :gren: :gren: