寻求ASP简单破解

bopp

程序大小：800KB

下载地址http://www.qz368.cn/download/qz368cn.rar

演示http://xsd.qz368.cn/

   我只需要:  破

<%'定义操作动作模块
sub prodclose()
if ProdNum="" or isnull(ProdNum) then
                Response.write "<BLOCKQUOTE><br><br>操作失败，没有选择合适参数！<A HREF='admin_prod.asp'><b>点击返回</b></A><BR><br><meta http-equiv=refresh content=""2;URL=admin_prod.asp""></BLOCKQUOTE>"
        else
                response.write "<script language='javascript'>window.alert('如果你要设置产品离线并商业使用，请到官方网站（www.qz368.cn）上留言或咨询！');window.location='admin_prod.asp';</script>"
                response.end       
        end if
end sub

sub prodopen()
        if ProdNum="" or isnull(ProdNum) then
                Response.write "<BLOCKQUOTE><br><br>操作失败，没有选择合适参数！<A HREF='admin_prod.asp'><b>点击返回</b></A><BR><br><meta http-equiv=refresh content=""2;URL=admin_prod.asp""></BLOCKQUOTE>"
        else
                                response.write "<script language='javascript'>window.alert('如果你要设置在线显示并商业使用，请到官方网站（www.qz368.cn）上留言或咨询！');window.location='admin_prod.asp';</script>"
                response.end                       
        end if
end sub

'处理数组函数
function checkreal(v)
dim w
if not isnull(v) then
        w=replace(v,", ",",")
        'w=replace(w," ","")
        checkreal=w
end if
end function

sub prodadd()
        if request("add") ="ok" then       
                response.write "<script language='javascript'>window.alert('如果你要添加新产品并商业使用，请到官方网站（www.qz368.cn）上留言或咨询！');window.location='admin_prod.asp';</script>"
          response.end
        else
LarCode=request("LarCode")
%>

谢谢~~~

bopp

仍然在线等~~````````````````

pengxing

如果dll了基本没办法破解.
如果没dll那和开源没区别...

bopp

我新手......不懂啊!  能帮忙看看不?

ku8tu

没有玩这种,有空玩玩.....................