conn.asp

来自「很好的OA办公系统」· ASP 代码 · 共 10 行

<%
function opendb(sessionname)
dim conn
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open "data source=Message;user id=shortmessage;password=farmerbaby197681"
set session(sessionname)=conn
set opendb=session(sessionname)
end function
%>