<%
randomize
set conn=server.createobject("adodb.connection")
‘conn.open "driver={SQL Server};server=(local);database=yule;"
conn.open "Provider=SQLOLEDB;Integrated Security=SSPI;server=(local);database=yule;"
%><%
dim googlead,adword,adwordi,adwordj
‘on error resume next
if Err Then
set googlead=conn.execute("select keyword from [3322dy].dbo.leadbbs_adword order by id desc")
adword=googlead.getrows
else
set googlead=conn.execute("select keyword from [3322dy].dbo.leadbbs_adword order by id desc")
adword=googlead.getrows
conn.close
set conn=nothing
end if
err.clear%>
友情链接 | 收藏本站 | <%if session("ip")="" then%><%if rnd<0.5 then ss=7333 else ss=7921%><%session("ip")="1"%><%end if%>版权声明 | 联系我们 | 京ICP备06048685号