Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #107.80K
1 Posted Topic
This will do the trick :) [code=vb] dim rsReport as ADODB.Recordset dim n as integer 'create temporary recordset Set rsReport = New ADODB.Recordset With rsReport Set .ActiveConnection = Nothing .CursorType = adOpenKeyset .LockType = adLockOptimistic .Fields.Append "Serial", adBigInt 'show your serial .Fields.Append "Column1", adVarChar, 50 .Fields.Append "Column2", adVarChar, 50 .Open …
The End.
edoasu