module1.bas

来自「一个用VB开发的家庭理财助手。较为实用。」· BAS 代码 · 共 13 行

Attribute VB_Name = "Module1"

Public LocalCnn As New ADODB.Connection   '本地连接
Public RemoteCnn As New ADODB.Connection    '远程连接

Public UserName As String    '用户名
Public UserPwd As String    '密码
Public PowerType As Integer '权限

Public MyDSN As String      'User DSN
Public UID As String        'User UID
Public PWD As String        'User PWD