<%
‘申明变量
Dim valName
Dim arrName
Dim objConn
Dim
connStr
If Request.Form(“mySubmit”) = “确定” Then
‘数据库链接代码
set
objConn=server.CreateObject(“ADODB.connection”)
connStr =
“PROVIDER=SQLOLEDB;Server=(local);DATABASE=test;UID=sa;PWD=123456;”
objConn.Open connstr
全文阅读 »