Private Sub CreateRS()
Set m_rs = New ADODB.Recordset
With m_rs
.fields.Append "Col1", adVarWChar, [b]5[/b], adFldIsNullable Or adFldUpdatable
.fields.Append "Col2", adVarWChar, [b]10[/b], adFldUpdatable Or adFldUpdatable
.Open
End With
End Sub
Col1 will have a max length of 5
Col2 will have a max length of 10
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.