%on error resume next%> <% sqlsys="select * from sysdefault" Set rssys=Server.CreateObject("ADODB.RecordSet") rssys.Open sqlsys,conn,1,1 Application("y_it_fromemail")=rssys("fromemail") Application("y_it_url")=rssys("url") Application("y_it_itname")=rssys("esname") rssys.close set rssys=nothing %>
|
|||||||||||||||||||||||||||||||||||||||||||||||||||
|
|