come connettersi ad access

[ngs]

ragazzi è possibile accedere ad un db access da vb senza usare il controllo dati?cioè è possibile accedere direttamente da codice con stringhe di connessione etc...?

[xegallo]

si usando sia ado che dao

[ngs]

puoi spiegarmi come o indicarmi un tutorial che lo spieghi bene?please, ho urgenza di saperlo!

[ngs]

non c'è nessuno che mi possa aiutare!?

[CAINO76]

CI SONO MOLTI MODI ...........

Uno è questo............

Prima di tutto dal menu Progetto seleziona riferimenti

poi seleziona microsoft ActivX Data Objects 2.6 Library e fai OK

poi dichiara in un modulo

Public Cnn1 As New ADODB.Connection

poi crea la funzione nel modulo



Public Function ApriDbAccess(stringa As String) As Long
Dim strCnn As String

' On Error Resume Next

strCnn = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & App.Path & "\nomedatabase.mdb;"

Set Cnn1 = New ADODB.Connection

Cnn1.Open strCnn

Set rsAccess = New ADODB.Recordset

rsAccess.Open stringa, Cnn1, adOpenKeyset, adLockOptimistic, adCmdText

ApriDbAccess = Err.Number

On Error GoTo 0

End Function

poi usa la funzione dal form
dim errore as integer
errore = ApriDbAccess("select * from nometabella")

If errore <> 0 Then
On Error GoTo 0
MsgBox Err.Description, vbExclamation, "Operazione annullata"
Exit Sub
End If

ricordati di mettere il database nella stessa cartella in cui si trova il vbp o successivamente l'exe

Ciao

[ngs]

mi spieghi perchè bisogna richiamare un componente?sai sono un principiante!