office_open.asp

一个用asp和sql server开发的网上办公系统

<%
Function opendb()
set conn =server.createobject("adodb.connection")
constr="Provider=sqloledb.1;server=localhost;database=office;uid=sa;pwd="
conn.open constr
set opendb=conn
End Function
Function closedb(conn)
set conn=nothing
End Function
%>