ASP操作多个数据表

ConnectDB("movie.dat.MDB")
Dim Crs As New ADODB.Recordset
Cexec = "select * from Seriallist"
Crs.Open Cexec, Conn, 1, 3    
While Not Crs.EOF

Dim Crsa As New ADODB.Recordset
Cexeca = "select * from where 名称='" &  Crs("名称") & "'"
Crsa.Open Cexeca, Conn, 1, 2                               '这里提示会对象已关闭
If Not Crsb.EOF = False Then
            Crsa.AddNew
            Crsa("名称") = Crs("名称")
            Crsa("链接地址") = Crs("链接地址")
            Crsa.Update
end if
Crs.MoveNext
Wend --------------------编程问答-------------------- ASP 没有 Dim Crs As New ADODB.Recordset 这种对象定义的用法吧。

补充：VB ,  数据库(包含打印，安装，报表)