<%
 
 
startime=timer()
 
 

 
strSQLServerName = "210.51.181.85"      '服务器名称或地址
strSQLDBUserName = "sa"    '数据库帐号
strSQLDBPassword = "leabuyadmin"    '数据库密码
strSQLDBName = "movie1"           '数据库名称
 

Set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
conn.Open connstr
%>
