endfunction.asp

来自「非常有商业价值的软件」· ASP 代码 · 共 24 行

<%
sql="select web_name,web_url,aboutus,shfw,zfsm,pssm from system_setup where id=1"
set rs=conn.execute (sql)
web_name=rs("web_name")
web_url=rs("web_url")
aboutus=rs("aboutus")
shfw=rs("shfw")
zfsm=rs("zfsm")
pssm=rs("pssm")
rs.close
set rs=nothing

sql="select company_name,company_address,postal,linkman,phone,fax,email from system_setup where id=1"
set rs=conn.execute (sql)
company_name=rs("company_name")
company_address=rs("company_address")
postal=rs("postal")
linkman=rs("linkman")
phone=rs("phone")
fax=rs("fax")
email=rs("email")
rs.close
set rs=nothing
%>