constring.bas

学生档案管理系统源码+几页设计论文 用JSP开发完成

Attribute VB_Name = "ModConString"
'定义一个属性过程反映连接字符串
Public Property Get conString() As Variant
conString = "data source=.;initial catalog=Sims_four;user id=sa;password=;"
End Property
'定义一个提供者反映数据库类型
Public Property Get conProvide() As Variant
conProvide = "sqloledb"
End Property