dbconn.asp

ASP编写的一个公司网站的源程序

<!--#include virtual="/Include/ADOVBS.asp"-->
<%
	Dim strConnection, conn,cmdTemp

	strConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath( "/avmaxmanage/UploadDatabase/avmax.mdb" ) & ";Persist Security Info=False"	' 上传后的路径
	
	Set conn = Server.CreateObject("ADODB.Connection")
	conn.ConnectionTimeout = 15
	conn.CommandTimeout = 30
	conn.Open strConnection
	Set cmdTemp = Server.CreateObject("ADODB.Command")
	cmdTemp.CommandType = 1
	Set cmdTemp.ActiveConnection = conn
%>