conn.asp

来自「学校勤工助学管理网站 功能可管理 考勤计算工资并进行等级评估。」· ASP 代码 · 共 16 行

<%
 
   connstr="Driver={SQL Server};Server=(local);UID=sa;PWD=618521;DATABASE=qingong"
   set conn=server.CreateObject("adodb.connection") 
   conn.Open connstr 
  
 function HTMLcode(fString)
if not isnull(fString) then
    fString = Replace(fString, CHR(13), "")
    fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
    fString = Replace(fString, CHR(10), "<BR>")
	fString = Replace(fString, CHR(32), "&nbsp;")
    HTMLcode = fString
end if
end function
%>