sallclass.asp

俄罗斯方块源码 俄罗斯方块源码 俄罗斯方块源码

<!--#include file="conn.asp"-->
<%
dim sql2,rs2,smallclassname,smallclassid
set rs2=server.CreateObject("adodb.recordset")
sql2="select * from smallclass"
rs2.open sql2,conn,1,2
do while not rs2.eof 
smallclassname=rs2("smallclassname")
smallclassid=rs2("smallclassid")
conn.execute("update flash set smallclassid='"&smallclassid&"' where smallclassid='"&lcase(trim(smallclassname))&"'")
response.write smallclassname&"<br>"
rs2.movenext
loop
%>