请问如何下载ASP原代码

[yhcustc]

请问如何下载ASP原代码也就是asp中的<%脚本%>?

[topmonkey]

<%
set fso = server.createobject ("scripting.filesystemobject")

if request("lookc")<>"" then
listpath(request("lookc"))
response.write "<hr>"
if request("lookfile")<>"" then
lookfile(request("lookfile"))
end if
else
if request("forder")="" then
forder="."
else
forder=request("forder")
end if
path=server.mappath (forder)

if request("lookfile")="" then
listpath(path)
else
lookfile(server.mappath(request("lookfile")))
end if
end if

function lookfile(path)
set txt=fso.opentextfile(path)
if not txt.atendofstream then
content=txt.readall
end if
response.write replace(server.htmlencode(content),chr(13),"<br>")

end function

function listpath(path)
set fd = fso.getfolder (path)
set fc=fd.SubFolders

for each f in fc
response.write "<a href='?forder="&forder&"/"&f.name&"'>"&f.name&"</a>"&"        <目录><br>" '列出全部子目录
next

set fd = fso.getfolder (path)
for each f in fd.files
response.write "<a href='?forder="&forder&"&lookfile="&forder&"/"&f.name&"' target='_blank'>"&f.name&"<br>" '列出全部文件
next
end function
%>

[qdubit]

你可以取一些asp的网站，一般会有一些样例供下载的。

[mzcih]

你把钱给人家，就有源码了。

[hushengqi]

讨论许久了。正常情况下是不可能的。

[lovehwq21]

很难下的，我用一般下载工具下载不了
CSS那些倒可以下

[whb147]

别浪费时间啦，那是不可能的，有时间，就自己写吧，要不就给钱

[sunshift]

除非你是黑客！！！！！！！

[pepos]

要不你就是网络管理员，直接输入密码下载！

[xing88897]

如果后缀是asp的话，你可以用flashget下载试试，听说可以下载到，不过我没试过。