Dim adoInsco As New ADODB.Recordset
Dim adoArea As New ADODB.Recordset
Dim conn As New ADODB.Connection
Dim strConn As String
Dim bEditMode As Boolean
strConn = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Data source=" & App.Path & "\ABC.mdb"
conn.Open strConn
adoInsco.CursorLocation = adUseClient
adoArea.CursorLocation = adUseClient
adoInsco.Open "select * from 公司檔 Order by [公司名稱]", conn, adOpenKeyset, adLockPessimistic
1.方法一
adoInsco.Find " [公司名稱]='復興人壽' AND [分公司名稱]='大安營業處' " -->找不到資料??
2.方法二
adoInsco.Find " ([公司名稱]='復興人壽') AND ([分公司名稱]='大安營業處') " -->找不到資料??
在資料庫中確實有此資料!! 可是使用方法一或方法二都對應不到說!!