Ciao ragazzi,
arrivo subito al dunque, io utlizzo questo codice per connettermi ad un database.mdb:
codice:
Dim db_file As String
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
db_file = "C:\...\DB"
If Right$(db_file, 1) <> "\" Then db_file = db_file & "\"
db_file = db_file & "DB.mdb"
Set conn = New ADODB.Connection
conn.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & db_file & ";" & _
"Persist Security Info=False"
conn.Open
Set rs = conn.Execute("SELECT DATA_FATTURA, ID_FATTURA, FROM DB_FATTURE", , adCmdText)
' Connette il Recordset al DataReport.
Set rptBooks.DataSource = rs
rptBooks.WindowState = vbMaximized
rptBooks.Show vbModal
rs.Close
conn.Close
...e fin qui tutto bene, io vorrei realizzare con un esempio simile, un datareport non collegato ai recordset ma collegato a diverse textbox contenute in un form, è possibile?
grazie vrclaudio