<% '------------------sql zhuru '-----------防注入代码---------------- '--------定义部份------------------ 'Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr '自定义需要过滤的字串,用 "|||" 分隔 Fy_In = "'|||;|||and|||exec|||insert|||select|||delete|||update|||count|||*|||%|||chr|||mid|||master|||truncate|||char|||declare" '---------------------------------- Fy_Inf = split(Fy_In,"|||") '--------POST部份------------------ If Request.Form<>"" Then For Each Fy_Post In Request.Form For Fy_Xh=0 To Ubound(Fy_Inf) If Instr(LCase(Request.Form(Fy_Post)),Fy_Inf(Fy_Xh))<>0 Then response.redirect "http://www.it168.com" End If Next Next End If '---------------------------------- '--------GET部份------------------- If Request.QueryString<>"" Then For Each Fy_Get In Request.QueryString For Fy_Xh=0 To Ubound(Fy_Inf) If Instr(LCase(Request.QueryString(Fy_Get)),Fy_Inf(Fy_Xh))<>0 Then response.redirect "http://www.it168.com" End If Next Next End If ''''''''''-----------sql end %> <%adoconn15%> <%id =replacestr(request("iid")) if id="" then response.write "请选择软件。" response.end end if %> IT168-软件频道
<% csql="update tbl_Soft_sky set cHits=chits+1 where id=" & id udc_conn.execute csql sqlstr="select * from tbl_soft_sky where id='"& id & "' " action=request("action") if action<>"preview" then sqlstr=sqlstr&" and c2='1' " end if udc_rs.open sqlstr,udc_conn,1 'response.write sqlstr if udc_rs.eof then response.write "对不起，没有找到这款软件。" else %>
软件下载>> &cbigTypecode=<%=udc_rs("cbigtype_code")%>"><%=udc_rs("cbigtype_name")%>>> &cbigTypecode=<%=udc_rs("cbigtype_code")%>&sname=<%=udc_rs("ctype_name")%>&smalltypecode=<%=udc_rs("ctype_code")%>"><%=udc_rs("ctype_name")%> >> <%=udc_rs("cname")%>
<%=udc_rs("cname")%>
<%if udc_rs("cwww")<>"" or udc_rs("ccorpname")<>"" then%> 软件作者： <% if udc_rs("cwww")<>"" and udc_rs("ccorpname")<>"" then response.write ""& udc_rs("ccorpname") &"" elseif udc_rs("cwww")="" and udc_rs("ccorpname")<>"" then response.write udc_rs("ccorpname") elseif udc_rs("cwww")<>"" and udc_rs("ccorpname")="" then response.write udc_rs("cwww") end if %>
<%end if%> <%if udc_rs("ccode")<>"" then%>作者mail： <%=udc_rs("ccode")%>
<%end if%> 支持语言： <% select case udc_rs("cWin_Lan") case "1" response.write "简体中文" case "2" response.write "繁体中文" case "3" response.write "英语" case "4" response.write "多国语言" case "5" response.write "法语" case "6" response.write "日语" case "7" response.write "韩语" case "8" response.write "德语" case "9" response.write "其它" end select %>
软件大小： <% if isnumeric(udc_rs("csize")) then response.write formatnumber(udc_rs("csize")/1024,0) & "KB" elseif udc_rs("csize")="" then response.write "未知" else response.write udc_rs("csize") & "KB" end if %>
反 安 装： <% select case udc_rs("iUninstall") case "0" response.write "不支持" case "1" response.write "支持" case "2" response.write "未知" end select %>
授权方式： <% select case udc_rs("cAccredit") case "0" response.write "免费版" case "1" response.write "共享版" case "2" response.write "试用版" case "3" response.write "演示版" end select %>
更新时间： <%=formatdatetime(udc_rs("cinput_date"),2)%>
下载次数： <%=udc_rs("chits")%>次
操作系统： <%=udc_rs("cwindow")%>
<%if udc_rs("cother")<>"" then%> 其他需求： <%=udc_rs("cother")%>
<%end if%> <%if udc_rs("cpicture")<>"" then%> 缩 略 图：　 点击查看 <%end if%>
 

软件介绍：
　　<%=replace(udc_rs("cinstro"),vbcrlf,"
　　")%>

<% set udc_rsb=server.createobject("adodb.recordset") sqlstr="select top 50 * from tbl_soft_con where iid='"& id &"' order by cflag " udc_rsb.open sqlstr,udc_conn,3 havecondoc=false haveconpro=false haveconsoft=false while not udc_rsb.eof if udc_rsb("cflag")=2 then haveconsoft=true if udc_rsb("cflag")=1 then havecondoc=true if udc_rsb("cflag")=3 then haveconpro=true udc_rsb.movenext wend %> <%if haveconsoft then%>

相关软件：
<% udc_rsb.movefirst while not udc_rsb.eof response.write ""& udc_rsb("ctitle") &"" udc_rsb.movenext wend %>

<%end if%>
<% if udc_rs("cfilename")<>"" then filename=udc_rs("cfilename") elseif udc_rs("curl1")<>"" then filename=udc_rs("curl1") elseif udc_rs("curl2")<>"" then filename=udc_rs("curl2") end if if udc_rs("c5")="" then if udc_rs("crotelink")<>"" and udc_rs("c3")="0" then %> "> <% else houzhui=right(filename,instr(strreverse(filename),".")) %> /<%="S"&udc_rs("id")& houzhui%>"><% end if%><% else%>"><%end if%> &softid=<%=id%>','','width=650,height=350')">
　　　　　')">
<%if udc_rs("cOtherMemo")<>"" then%>
　　相关信息
　·<%=udc_rs("cOtherMemo")%>
<%end if%> <%end if%> <%if haveconpro=true then%> <%end if%>
<%if havecondoc=true then%>
　　相关文章
<% i=0 udc_rsb.movefirst while not udc_rsb.eof and i<5%> <% udc_rsb.movenext i=i+1 wend %>
·/<%=mid(udc_rsb("cdoc_id"),5,4)%>/<%=udc_rsb("cdoc_id")%>.shtml" target="_blank"><%=udc_rsb("ctitle")%>
　　相关产品
<% i=0 udc_rsb.movefirst while not udc_rsb.eof and i<5%> <% udc_rsb.movenext i=i+1 wend %>
·" target="_blank"><%=udc_rsb("ctitle")%>
 
<%end if udc_rs.close set udc_rs=nothing udc_conn.close set udc_conn=nothing %>