rija
Utente Attivo
- Messaggi
- 198
- Reazioni
- 0
- Punteggio
- 38
scusate ragazzi ma ho un problema guardate
If Dir("C:\TempFile\ecom_affiliati2.mdb") = "" Then Exit Sub
Dim DbCnn, TxtCnn As New Data.OleDb.OleDbConnection
Dim CnnString, CommandText As String
Dim Cmm As New Data.OleDb.OleDbCommand
Dim TxtDr As OleDb.OleDbDataReader
CnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TempFile\ecom_affiliati2.mdb;User Id=admin;Password=;"
DbCnn.ConnectionString = CnnString
DbCnn.Open()
CnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TempFile\ecom_affiliati2.mdb;User Id=admin;Password=;"
TxtCnn.ConnectionString = CnnString
TxtCnn.Open()
CommandText = "SELECT * FROM articolif11.txt"
Cmm.CommandText = CommandText
Cmm.Connection = TxtCnn
TxtDr = Cmm.ExecuteReader
mi da errore
Impossibile trovare il file "C:\Documents and Settings\Marino\Documenti\Visual Studio 2005\Projects\Gfk\AggiornaDb\bin\Debug\articolif11.mdb".
aiuto plz ç_ç
If Dir("C:\TempFile\ecom_affiliati2.mdb") = "" Then Exit Sub
Dim DbCnn, TxtCnn As New Data.OleDb.OleDbConnection
Dim CnnString, CommandText As String
Dim Cmm As New Data.OleDb.OleDbCommand
Dim TxtDr As OleDb.OleDbDataReader
CnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TempFile\ecom_affiliati2.mdb;User Id=admin;Password=;"
DbCnn.ConnectionString = CnnString
DbCnn.Open()
CnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TempFile\ecom_affiliati2.mdb;User Id=admin;Password=;"
TxtCnn.ConnectionString = CnnString
TxtCnn.Open()
CommandText = "SELECT * FROM articolif11.txt"
Cmm.CommandText = CommandText
Cmm.Connection = TxtCnn
TxtDr = Cmm.ExecuteReader
mi da errore
Impossibile trovare il file "C:\Documents and Settings\Marino\Documenti\Visual Studio 2005\Projects\Gfk\AggiornaDb\bin\Debug\articolif11.mdb".
aiuto plz ç_ç