Questo topic e' stato chiuso dal moderatore.
13/04/10 17:39
Fr4nk94
Salve a tutti.
Sto costruendo un pogramma che comunica con un database (seguendo più o meno il codice di una guida che ho trovato [url=totem.altervista.org/guida/versione2/…).
Ecco il mio codice:
Il mio problema è:
all'avvio del programma visual studio trova un errore nella parte finale del codice sottolineando " dbadp.Fill(data) " e dicendo che c'è "Errore di sintassi nella proposizione FROM " e lo segnala come un " OleDBException was unhandled "
(Qui:
Qualcuno me lo sa spiegare???
grz 1000
Sto costruendo un pogramma che comunica con un database (seguendo più o meno il codice di una guida che ho trovato [url=totem.altervista.org/guida/versione2/…).
Ecco il mio codice:
Public Class Program 'connessione al database Private dbcon As OleDb.OleDbConnection 'istruzioni sql Private dbcmd As OleDb.OleDbCommand 'crea l'adapter Private dbadp As OleDb.OleDbDataAdapter 'una copia del database in memoria Private data As New DataSet Private Sub sqlselect(ByVal SQL As String) dbcmd.CommandText = String.Format(SQL) dbadp.SelectCommand = dbcmd data.Clear() dbadp.Fill(data) grdPASS.DataSource = data.Tables(0) End Sub Private Sub refreshdatagridview() Me.sqlselect("SELECT * FROM Password") End Sub Private Sub Program_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown Dim database As String = Application.StartupPath & "\data-password.mdb" dbcon = New OleDb.OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=" & database) dbcon.Open() dbadp = New OleDb.OleDbDataAdapter("SELECT * FROM Password", dbcon) dbadp.Fill(data) dbcmd = New OleDb.OleDbCommand() dbcmd.Connection = dbcon Dim table As DataTable = data.Tables(0) grdPASS.DataSource = table End Sub End Class
Il mio problema è:
all'avvio del programma visual studio trova un errore nella parte finale del codice sottolineando " dbadp.Fill(data) " e dicendo che c'è "Errore di sintassi nella proposizione FROM " e lo segnala come un " OleDBException was unhandled "
(Qui:
'... Private Sub Program_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown Dim database As String = Application.StartupPath & "\data-password.mdb" dbcon = New OleDb.OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=" & database) dbcon.Open() dbadp = New OleDb.OleDbDataAdapter("SELECT * FROM Password", dbcon) dbadp.Fill(data))
Qualcuno me lo sa spiegare???
grz 1000
aaa