link.bas

来自「三季稻 是发就可了是的就发四饿饿饿饿饭建立刊物机」· BAS 代码 · 共 8 行

Attribute VB_Name = "link"

Public Sub link()
    Set Mcon = New ADODB.Connection
    Mcon.ConnectionString = "Provider=sqloledb;Data Source=zhw;Initial Catalog=SuperMarketdb;User Id=sa;Password=820527;"
    Mcon.Open
End Sub