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

ASPÒþ²ØÏÂÔصØÖ·

<%
Response.Buffer = true
Response.Clear
dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
Dim strFileName
strFileName=replace(replace(Request("file"),"\",""),"/","")  '´«²Î
strFileName="/files/"&strFileName    ' ¸Ä³ÉÄãÄãÎļþµÄ´æ·Å·¾¶
If strFileName<>"" Then
'******************************ÏÂÔØÎļþ´æ·ÅµÄ·þÎñ¶ËĿ¼
url=Server.MapPath(strFileName)
else
    Response.Write("no found")
    Response.end 
End If
Set fso=Server.CreateObject("Scripting.FileSystemObject")
Set fl=fso.getfile(url)
flsize=fl.size
flName=fl.name
Set fl=Nothing
Set fso=Nothing
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 1
objStream.LoadfromFile url
Select Case lcase(Right(flName, 4))
Case ".asf"
ContentType = "video/x-ms-asf"
Case ".avi"
ContentType = "video/avi"
Case ".doc"
ContentType = "application/msword"
Case ".zip"
ContentType = "application/zip"
Case ".xls"
ContentType = "application/vnd.ms-excel"
Case ".gif"
ContentType = "image/gif"
Case ".jpg", "jpeg"
ContentType = "image/jpeg"
Case ".bmp"
ContentType = "image/bmp"
Case ".ppt"
ContentType = "application/vnd.ms-powerpoint"
Case ".mdb"
ContentType = "application/x-msaccess"
Case ".wav"
ContentType = "audio/wav"
Case ".mp3"
ContentType = "audio/mpeg3"
Case ".mpg", "mpeg"
ContentType = "video/mpeg"
Case ".rtf"
ContentType = "application/rtf"
Case ".htm", "html" ,"htm(1)"
ContentType = "text/html"
Case ".txt"
ContentType = "text/plain"
Case Else
ContentType = "application/octet-stream"
End Select
'  ÎÒÊÇÓÃUPload×é¼þÉÏ´«µÄ,Èç¹ûÖØÃû»á²úÉú"(Êý×Ö)" ºó׺,
'  ÓÐЩÖ÷»ú»á×èÖ¹ÏÂÔØÕâÀàÎļþ,ËùÒÔÕâÀï¼ÓÒ»¸ö¼ì²é,½«Upload×é¼þ×Ô¶¯Éú³ÉµÄºó׺
If InStr(lcase(Right(flName, 1)),")") Then
 flName=mid(flName,1,Len(flName)-3)
End If
Response.AddHeader "Content-Disposition", "attachment; filename=" &


Ïà¹ØÎĵµ£º

asp´ÓÊý¾Ý¿âÖÐÊä³öµÄ¶«Î÷»»ÐÐ

 <%  
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from 0791idc_News where BigClassName='¼Ò×°¿ÎÌÃ' order by ID desc"
rs.Open sql,Conn,1,1
if rs.eof and rs.bof then
  response.Write("ÔÝʱûÓмǼ")
else
%>
         ......

ASP.NET Cache_µÚËÄƪ_ÈçºÎÒƳýASP.NET»º´æÖеĻº´æ

+++ ASP.NET»º´æÖеÄÊý¾ÝÊDz»Îȶ¨µÄ£¬²»»á±»ÓÀ¾ÃµØ´æ´¢£¬¿ÉÄÜ»áÓÉÓÚÒÔÏÂÔ­ÒòÖ®Ò»¶ø´Ó»º´æÖб»×Ô¶¯ÒƳý£º
1) »º´æÂúÁË
2) »º´æÏîÒѾ­¹ýÆÚ
3) »º´æÒÀÀµµÄÏî¸Ä±äÁË
+++ ³ýÁË¿ÉÒÔ×Ô¶¯ÒƳý»º´æÏîÍ⣬Äã¿ÉÒÔÏÔʾÒƳý»º´æÏî¡£ÁíÍ⣬µ±ÄãÓÃInsert·½·¨ºÍAdd·½·¨Ïò»º´æÖÐÌí¼ÓµÄ»º´æÏîÒѾ­´æÔÚʱ£¬ÄÇô£¬Ô­À´µÄ»º´æÏ±»×Ô¶¯É¾³ý¡ ......

asp .net Ò³Ãæ»Ø³µ´¥·¢button °´Å¥Ê¼þ

1¡£Éî²ã´ÎÀ´ËµÕâ²»ÊÇasp.net µÄÎÊÌ⣬¶øÊÇhtml form µÄsubmit °´Å¥¾ÍÊÇÈçºÎÉè¼Æ¡£
µ±ÄãµÄ¹â±ê½¹µã½øÈëij¸ö±íµ¥ÔªËصÄʱºò£¬»á¼¤»î¸Ã±íµ¥µÄµÚÒ»¸ö£¨
Á÷²¼¾Ö˳´Ó×óµ½ÓÒ£¬´ÓÉÏÖÁÏ£©
type=submit µÄ°´Å¥£¨¼ÙÈçÓУ©£¬µÈ´ýÏìÓ¦»Ø³µÊ¼þ£¬²¢Ìá½»¸Ãform
Äã¿ÉÒÔ²âÊÔһϴúÂë
<form action="">
 <input type ="t ......

Asp ADODB.Stream¶ÔÏóµÄ·½·¨ÊôÐÔ

Adodb.StreamÊÇADOµÄStream¶ÔÏó,Ìṩ´æÈ¡¶þ½øÖÆÊý¾Ý»òÕßÎı¾Á÷,´Ó¶øʵÏÖ¶ÔÁ÷µÄ¶Á¡¢Ð´ºÍ¹ÜÀíµÈ²Ù×÷.
ÓÐÏÂÁз½·¨£º
Cancel ·½·¨
     ʹÓ÷½·¨ÈçÏÂ
     Object.Cancel
    
˵Ã÷£ºÈ¡ÏûÖ´ÐйÒÆðµÄÒì²½ Execute »ò Open ·½·¨µÄµ÷Óá£
Close  ·½·¨
......

asp access utf ÖÐÎÄ ÂÒÂëÔõô°ì


asp ÖÐÎÄÂÒÂë,asp access ÂÒÂë,asp ˢкóÂÒÂë,asp utf 8ÂÒÂë,ajax ÂÒÂë asp,asp ºº×ÖÂÒÂë,aspÂÒÂëÔõô°ì
ÓÃutf-8±àÂëÓÃÔÚеÄÍøÕ¾ÉÏ£¬²»ÏëÎÊÌ⻹Õæ¶à£¬ËùÒÔÕÒÁËЩÎÄÕ£¬Ìû×Ó£¬¿´ÁË¿´£¬µÈÏÂÓÐÓõľÍÌùÏÂÃæÁË¡£
½ñÌ죬ÎÒ¿ªÊ¼°Ñ CODEPAGE="936" ¸Ä³É CODEPAGE="65001"
°Ñcharset=gb2312¸Ä³É charset=utf-8
¿ÉÊÇ»¹ÊÇÂÒÂë ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ