ASP代码,期待高手前来解释一下,

来源：百度知道编辑：UC知道时间：2024/07/02 22:42:40

<% set rsData_TypePath = Server.CreateObject("ADODB.Recordset")
szSQL = "SELECT Type_ID,TypeName FROM TypeInfo where Type_ID >20"
rsData_TypePath.Open szSQL,con,1,3
do while not rsData_TypePath.EOF
iTypeID = rsData_TypePath("Type_ID")
szSQL = "SELECT ProgName,Prog_GUID,JoinTime,Part_No,Prog_ID FROM ProgInfo WHERE Type_ID=" & iTypeID &" order by Prog_ID desc"
set rsData_PTID = Server.CreateObject("ADODB.Recordset")
rsData_PTID.Open szSQL,con,1,1
bs=0
js=0
newgames=""
Prog_GUID=""
do while not rsData_PTID.EOF
if Prog_GUID <> rsData_PTID("Prog_GUID") then
bs=bs+1
end if
js=js+1
if DateDiff("d",rsData_PTID("JoinTime"),Now()) =0 then
newgames=newga

看电影网站得```
js=js+1
if DateDiff("d",rsData_PTID("JoinTime"),Now()) =0 then
newgames=newgames&"<a href='JavaScript:playgame("&rsData_PTID("Prog_ID")&")'>"&rsData_PTID("ProgName")&"【第"& rsData_PTID("Part_No") &"集】 "
end if
多少级````

不要扔出一堆代码就让别人解释,提提你的问题吧..

ASP代码,期待高手前来解释一下, 请教高手解释ASP代码 ASP高手解释下这窜代码请教高手,ASP,解释代码意思找高手解释一段ASP代码！！ asp高手请进，帮解释下代码： asp代码解释。高手进来看看 asp问题,期待高手! 关于一短asp代码高手进 ASP代码解释