数据未从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”，康涅狄格州，adOpenDynamic，ADLOCKOPTIMISTIC