Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

asp·¾¶µÄÎÊÌâ

ÏÂÃæµÄ´úÂëÊÇÓÃaspÀ´ÏÂÔØexeÎļþµÄ£¬ºÍÖ±½ÓÏÂÔØexeµÄÇø±ð¾ÍÊÇËû±£´æµÄÎļþÃûÊÇ»ñÈ¡ä¯ÀÀÆ÷IDÉú³ÉµÄ¡£´úÂëÕý³£Ê¹Ó㬵«ÊÇÎÒÏ£ÍûÄܰÑFileName¸Ä³ÉÎïÀí·¾¶£¬¸ñʽÊÇ£ºd:/web/down/a.exe СµÜ²Ë²Ë£¬¸ßÊÖ°ïæ¡£
(Áí:ÎÒ¾õµÃ´úÂëÓеãÓ·Ö×£¬ÄܰïÎÒд¸ö¼òµ¥µÄÂ𣿣©
SQL code:
ID = Request.QueryString("ID")
Dim Stream
Dim Contents
Dim FileName
Dim FileNames
Dim FileExt
Const adTypeBinary = 1
FileName = "av_play.exe" 'ÒªÏÂÔØµÄÎļþÃû ¼¯³Éµ½³ÌÐòÀïÇë×Ô¼ºÓú¯ÊýʵÏÖ
ok=1 'ÉèÖñ£´æÎļþµÄ·½Ê½ 0ΪĬÈÏÃû×Ö 1ΪÏÂÃæÉèÖõÄÃû×Ö
if ok=1 then
FileNames = ""&id&".exe" 'Òª±£´æµÄÎļþÃû£¨µ±±£´æ·½Ê½Îª0ʱ£¬´ËÉèÖÃÎÞЧ£©
else
FileNames = FileName
end if
FileExt = Mid(FileName, InStrRev(FileName, ".") + 1)
Select Case UCase(FileExt)
Case "ASP", "ASA", "ASPX", "ASAX", "MDB"
Response.Write "Êܱ£»¤Îļþ,²»ÄÜÏÂÔØ."
Response.End
End Select
' ÏÂÔØÕâ¸öÎļþ
Response.Clear
Response.ContentType = "application/octet-stream"
Response.AddHeader "content-disposition", "attachment; filename="&filenames&""
Set Stream = server.CreateObject("ADODB.Stream")
Stream.Type = adTypeBinary
Stream.Open
Stream.LoadfromFile Server.MapPath(FileName)
While Not Stream.EOS
Response.BinaryWrite Stream.Read(1024 * 64)
Wend
Stream.C


Ïà¹ØÎÊ´ð£º

Ò»¶Îaspתphp

<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......

ÎÒÊÇÒ»ÃûASP´¦Ñ§Õߣ¡ÏëÇë°ïÃ¦ÍÆ¼öÒ»±¾ASPºÃµÄÊé¼®

ÎÒÔ­±¾ÊÇѧjspµÄ¿ÉÕÒÁËÒ»¸öASPµÄ¹«Ë¾£¡ÎÒÒªÖØÐÂѧϰ£¡ ѧϰASP£¡ Ï£Íû´ó¼ÒÍÆ¼öÒ»±¾ºÃÊ鏸ÎÒлл
<ASP3.0¸ß¼¶±à³Ì> ÍøÉÏÓеç×Ó°æµÄ

·¢ÏÖÍøÉÏaspÐÅϢʱ×î¶àµÄ ±ÈÆäËûµÄ¶¼¶àºÃ¶à

yun

ÕÒ±¾ÓÐÓ¦ÓÃÊÂÀýµÄA ......

aspÒ³Ãæµ÷ÊÔÎÊÌâ

½¨ÁËÒ»¸öÕ¾µã£¬ÀïÃæÓÐ login.aspx. events.aspx µÈµÈ ÆäËûµÄÒ³Ãæ¡£


µ«ÊÇÎÒµ÷ÊÔ ÆäËûÒ³ÃæµÄʱºò£¬±Ä³öÀ´µÄ×ÜÊÇ login.aspx Ò³Ãæ¡£

¸Õѧasp ÇëÖ¸½Ì
ÄãÉèÖÃÆðʼҳÁ˰ɡ£¡£

¶÷ÔõôȡÏûÄØ£¿

Òªµ ......

asp±íµ¥Ìá½»ÎÊÌâ

Çë¸÷λ¸ßÊÖ°ï½â¾ö,¼±!!!
<script language="JavaScript" type="text/javascript">
function CheckInput(){
if (document.frm.loginname.length =0){
alert('ÇëÕý ......

asp´¥·¢Ê¼þÎÊÌâ

ÔÚÒ»¸ö·¢±íÎÄÕµÄÒ³Ãæ£¬Èç¹ûÖÐ;¹Ø±ÕÒ³Ãæ£¬ÕâÌáʾÊÇ·ñ·ÅÆú±à¼­£¬
Èç¹ûµã»÷·ÅÆú£¬ÔòתÏòÌîд·ÅÆúÔ­ÒòµÄ½çÃæ£¬
Èç¹ûµã²»·ÅÆú£¬ÕâÍ£ÁôÔÚÔ­Ò³Ãæ£¬
Èç¹ûÊǵã»÷Ò³ÃæµÄ³¬¼¶Á´½Ó£¬Ôò´¥·¢Ê¼þʧЧ

ÈçºÎ±àд´ú ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ