数据未从VB6插入到oracle数据库中

Question

我想在VB6的oracle数据库中的FingerData表中添加数据。这就是为什么，我有以下代码。

Dim conn As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
Dim cn As String

cn = "Provider=OraOLEDB.Oracle;Password=fingerprintdata;User ID=fingerprintdata;Data Source=10.11.201.84;Persist Security Info=True"
conn.Open cn
cmd.ActiveConnection = conn
conn.CursorLocation = adUseClient
rs.Open "FINGERDATA", conn, adOpenStatic, adLockOptimistic, adCmdTable


s = StrConv(b, vbUnicode)
rs.AddNew
rs!UserName = strName
rs!fingerdata = "123"
rs!key = "Testing 9001"
rs.Update
Set conn = Nothing
Set rs = Nothing

但是没有插入数据。错误是什么？如何从vb6在oracle数据库中插入数据？

Answer 1

请使用此声明：

rs.Open“FINGERDATA”，conn，adOpenDynamic，adLockOptimistic