ADO Data Shaping

[compuGEEK]

Hello all,

I have my connection string in place...

Dim cnn As ADODB.Connection
Dim cnnstring As String
Dim rst As ADODB.Recordset

cnnstring = "DSN=MS Access Database;DBQ=c:\some_database.mdb;DriverID = 25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;UID=admin;"

Set cnn = New ADODB.Connection

With cnn
.ConnectionString = cnnstring
.Provider = "MSDASQL.1"
.Properties("Prompt") = adPromptNever
.Open cnnstring
End With

Set rst = New ADODB.Recordset
rst.CursorType = adOpenKeyset
rst.LockType = adLockOptimistic
rst.Open "some_table", cnn, , , adCmdTable

When the user enters their personal information, it goes into a database from one table and will allow them to put 3 fields of information into another table.

Question: How and where do I add the reference for MSDataShape provider with the code above? Do I replace the MSDASQL.1 provider or do I add it in addition to what I have already?

Also, how do I write a shape command to allow this recordset addnew to happen?

Thank you..