module1.bas

企业生产管理系统 提供对企业的日常生产管理

Attribute VB_Name = "Module1"
'Public adoRs As New ADODB.Recordset
'Dim temp

'Function cnn() As ADODB.Connection
'  Set cnn = New ADODB.Connection
'  cnn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=company;Data Source=WGH"
'End Function