<%
Dim bigpic,bigurl,top,topurl,middle,middleurl,bottom,bottomurl,left1,left2,left3,left1url,left2url,left3url,right1url,right2,right2url,right3,right1,right3url
Dim zuo1,zuo2,zuo3,zuo4,zuo1url,zuo2url,zuo3url,zuo4url
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from ad",conn,1,1
bigurl=trim(rs("bigurl"))
bigpic=trim(rs("bigpic"))
top=trim(rs("top"))
topurl=trim(rs("topurl"))
middle=trim(rs("middle"))
middleurl=trim(rs("middleurl"))
bottom=trim(rs("bottom"))
bottomurl=trim(rs("bottomurl"))
left1=trim(rs("left1"))
left1url=trim(rs("left1url"))
left2=trim(rs("left2"))
left2url=trim(rs("left2url"))
left3=trim(rs("left3"))
left3url=trim(rs("left3url"))
right1=trim(rs("right1"))
right1url=trim(rs("right1url"))
right2=trim(rs("right2"))
right2url=trim(rs("right2url"))
right3=trim(rs("right3"))
right3url=trim(rs("right3url"))
zuo1=trim(rs("zuo1"))
zuo1url=trim(rs("zuo1url"))
zuo2=trim(rs("zuo2"))
zuo2url=trim(rs("zuo2url"))
zuo3=trim(rs("zuo3"))
zuo3url=trim(rs("zuo3url"))
zuo4=trim(rs("zuo4"))
zuo4url=trim(rs("zuo4url"))
rs.close
set rs=nothing
%>
|
 |
|
 |
|
|
|
|
|