Information générale
Catégorie:
Contrôles ActiveX en VFP
Titre:
ADO and SQL into VFP tables
It seems that every time I try getting an ADO connection to insert or update data in a VFP table I can only use character as a data type, I can't even get integer types to work. Here is an example of the code:
&& It takes the sql satement and the DSN as parameters
Sub ADODBRequest(cDSN , sqlComm As String) ' Open an ADO Connection to a datasource and execute a SQL statement that is passed as the parameter CLW 09/2/99
Dim iDB as Object
Dim iRS as Object
Dim x as Integer
'Instantiate ADODB object
Set iDB = CreateObject("ADODB.Connection")
'Open Connection
iDB.Open cDSN
' MsgBox "The Completed connection string is: " & iDB.ConnectionString ' For debugging
'Execute a query
Set iRS = iDB.Execute(sqlComm)
'Close Connection
iDB.Close
'De-reference object
Set iDB = nothing
End Sub
Thanks, Casey
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement