高考问答tct检查正常hpv52阳性:关于建立学生管理系统的问题。。
来源：百度文库 编辑：高考问答 时间：2024/05/09 01:50:53
我在做一"学生信息管理系统"
里面用到模块,
模块内代码如下:
Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
....
End Function
....
编译时出现:
"Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset"
"编译错误!用户自定义类型未定义"
***************************************************************************************
怎么回事啊~~
Project --> References --> Microsoft ActiveX Data Objects 2.x Library这个已经引用了~~
还是没用。。。
**************************************************************************************
听人家说是不是先要连接数据库？
那怎么连呢？
我用的是SQL Server
谢谢了！！！
里面用到模块,
模块内代码如下:
Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
....
End Function
....
编译时出现:
"Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset"
"编译错误!用户自定义类型未定义"
***************************************************************************************
怎么回事啊~~
Project --> References --> Microsoft ActiveX Data Objects 2.x Library这个已经引用了~~
还是没用。。。
**************************************************************************************
听人家说是不是先要连接数据库？
那怎么连呢？
我用的是SQL Server
谢谢了！！！
Set Conn = Server.CreateObject("ADODB.Connection")
Connstr="Driver={SQL Server};Server=IP地址;Uid=用户名;Pwd=密码;DataBase=数据库名"
Conn.open Connstr
建议你用delphi 开发，图形界面，会pascal语言和C语言就可以了