推荐:插入ASP代码让网站数据库成为ASP木马很多时候我们可以通过在注册表单或者用户信息修改表单中,插入简短的ASP代码,使网站ASP数据库变成为一个ASP木马,然后进一步入侵控制服务器。
不过在上传代码过程中,许多网页程序都不允许包
以下为引用的内容:
<% Class aspxsky_page Private Sub class_initialize End Sub
Public Function Alert(message,gourl) message = replace(message,"'","\'") If gourl="-1" then Response.Write ("<script language=javascript>alert('" & message & "');history.go(-1)</script>") Else Response.Write ("<script language=javascript>alert('" & message & "');location='" & gourl &"'</script>") End If Response.End() End Function
Public Sub showpage(str,page,url) if not isnumeric(page) then alert "提示:错误的参数!","-1" end if if page="" or page=0 or isnull(page) or isempty(page) then page=1 else page=cint(page) end if str=split(str,"{nextpage}") abspage=page pcount=ubound(str) 1 if page>cint(ubound(str) 1) or page<1 then alert "提示:错误的参数!","-1" else response.write str(page-1)&"<br><br><center> 共分为"&pcount&"页 " end if
for p=0 to ubound(str) response.write "<a href="&url&"p="&p 1&">["&p 1&"]</a> " next response.write "当前第"&abspage&"/"&pcount&"页</center>" End Sub End Class
'------------------调用----------------------- p=request.QueryString("p") str="第一页:这里是第一页的内容{nextpage}第二页:这里是第二页的内容" url="shownews.asp?id="&id&"&" set newpage=new aspxsky_page newpage.showpage str,p,url %>
|
分享:国内ASP应用,不容乐观新的ASP概念不是指开发工具ASP(ActiveX Server Pages),而是指应用服务提供商(Application Service Provider)一种新的IT经营模式。通俗的话,即企业不购买应用软件,而是采用租赁的形式租用软件