请问,如何将连接数据库的那段程序放到model中。
将连接数据库的程序放在哪儿才可以不需要每次都加载它?
dim conn as adodb.connection
dim connstr as string
connstr = "Provider=SQLOLEDB.1;Persist Security Info=True; Initial Catalog=[数据库名];Data Source=[服务器名]; User ID=sa;Password=;"
set conn = new adodb.connection
If conn.State = adStateOpen Then conn.Close
conn.open connstr