Dim strConn As String
Dim oRs As ADODB.Recordset
Dim SQL As String
strConn = "Provider=SQLOLEDB.1;user id=sa;pwd=123;initial catalog=dbname;data source=machine name"
oRs = New ADODB.Recordset()
oRs.CursorLocation = CursorLocationEnum.adUseClient ' ADO bookmarks support
SQL = "SELECT *, ? as x, ? as y From (name) WHERE ?= ? "
oRs.Open(SQL, strConn, CursorTypeEnum.adOpenKeyset, LockTypeEnum.adLockReadOnly, CommandTypeEnum.adCmdText)
error when open database, Please help Me...
Dim oRs As ADODB.Recordset
Dim SQL As String
strConn = "Provider=SQLOLEDB.1;user id=sa;pwd=123;initial catalog=dbname;data source=machine name"
oRs = New ADODB.Recordset()
oRs.CursorLocation = CursorLocationEnum.adUseClient ' ADO bookmarks support
SQL = "SELECT *, ? as x, ? as y From (name) WHERE ?= ? "
oRs.Open(SQL, strConn, CursorTypeEnum.adOpenKeyset, LockTypeEnum.adLockReadOnly, CommandTypeEnum.adCmdText)
error when open database, Please help Me...
Last edited: