📄 qollar.asp
字号:
<%
dim startimes,conns,connstrs,dbs
dim qid,webname
startimes = Timer()
dbs = "\database\#sunbtob.asp"
Set conns = Server.CreateObject("ADODB.Connection")
connstrs="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&dbs&"")
conns.Open connstrs
%>
<%set rss=server.CreateObject("adodb.recordset")
rss.Open "select top 1 * from qollar where id=1",conns,1,1
qid=trim(rss("qid"))
webname=trim(rss("webname"))
%>
<SCRIPT id='pworm_im_id' src='http://im.pworm.com/js/web/pworm_im.js?id=<%=qid%>&ti=<%=webname%>'></SCRIPT>
<%rss.Close
set rss=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -