Aprire un nuovo progetto EXE standard di Visual Basic . Dal menu, selezionare "Progetto" e poi "Riferimenti ". Fare clic sulla casella di controllo accanto a " Microsoft ActiveX Data Objects 2.x " , dove " x " è il numero più alto disponibile sul computer . Fare clic sul pulsante "OK" per salvare e chiudere .
2
Aggiungere un nuovo pulsante per il predefinito " Form1 " che è stato creato per impostazione predefinita. Assegnare un nome al pulsante " cmdUpdate " e impostare la voce uguale a " Aggiorna ". Questo pulsante consente di salvare tutti gli aggiornamenti direttamente alla tabella appropriata ( s ) .
3
Dichiarare le variabili per memorizzare gli oggetti ADODB e una variabile stringa per l'istruzione SQL stessa.
Dim oConn come ADODB.Connection
Dim strSQL As String Dim
OCMD come ADODB.Command
4
connettersi al database nell'evento " Form_Load " di . " Form1 "
oConn = New ADODB.Connection
oConn.ConnectionString = " DSN = mio_nome_db ; UID = admin e pwd = password ; "
oConn.Open
5 Codice
l' SQL per l'istruzione " aggiornamento " in caso di click
strSQL = "UPDATE myTable SET columnName = ' NuovoNome ' WHERE ID = 3" cmdUpdate . " ; "
oCmd.CommandText = strSQL
oCmd.Execute
Programmazione © www.354353.com