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

asp¼òµ¥ÎļþÉÏ´«Ô´Âë


Îļþ1.ÉÏ´«½çÃæÎļþ   upload.htm
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ÎļþÉÏ´«</title>
</head>
<body>
<form method="POST" action="SaveFile.asp">
ÎļþÉÏ´«£º<input type="file" name="file" size="42">&nbsp;<input type="submit" value="Ìá½»" name="bb">
</form>
</body>
</html>
Îļþ2.±£´æÉÏ´«Îļþ   SaveFile.asp
<%
dim file,filename,houzui
file = Request.Form("file")
if file="" then
 response.write"<script>alert('ÇëÑ¡ÔñÒªÉÏ´«µÄÎļþ£¡');window.location.href='upload.htm';</script>"
else
 houzui=mid(file,InStrRev(file, "."))
 
 if houzui=".gif" or houzui=".jpg" or houzui=".bmp" then   'ÔÊÐíÉÏ´«µÄÎļþÀàÐÍ
  filename=year(date) & month(date) & day(date) & Hour(time) & minute(time) & second(time) & houzui
  Set objStream = Server.CreateObject("ADODB.Stream")
  objStream.Type = 1
  objStream.Open
  objStream.LoadfromFile file
  objStream.SaveToFile Server.MapPath(filename),2
  objStream.Close
//============================°ÑÎļþÃûдÈëÊý¾Ý¿â£¬ÈçÎÞÐèÒª£¬¿Éɾ³ý´Ë¶Î´úÂ룡
  Set conn = Server.CreateObject("ADODB.Connection")
  conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mb.mdb")
  set rs=server.CreateObject("adodb.recordset")
  rs.open "select*from img",conn,1,2
  rs.addnew
  rs("name")=filename
  rs.update
  set rs=nothing
 &


Ïà¹ØÎĵµ£º

ʵÏÖasp³ÌÐòµ÷ÓÃÉãÏñÍ·²¢¿ØÖÆÉãÏñÍ·½øÐÐÅÄÕÕ

Õ⼸ÌìºÃ¶àÈËÎÊÎÒÈçºÎÔÚasp³ÌÐòÖпØÖÆÉãÏñÍ·È¥×¥ÅÄÕÕÆ¬£¬asp¼¼Êõ»¹ÊÇ99ÄêµÄʱºò¿´¹ýÒ»µãµã£¬Ôç¾Í×ÅÃ×·¹³ÔÁË£¬²»¹ý¼ÈÈ»ÓÐÈËÎÊ£¬ÄǾÍÊÇ¿´µÃÆðÔÛ£¬»¨ÁËÒ»¸öÍíÉϵÄʱ¼ä°Ñasp³ÌÐòµ÷ÓÃÉãÏñÍ·ÅÄÕÕµÄÎÊÌâ¸ã¶¨ÁË£¬ÏּǼÈçÏ£¬ÈÃÓÐÀàËÆÐèÇóµÄͬѧ¿ÉÒÔÉÙ×ßЩÍä·¡£
Óõ½µÄ¼¼Êõ£º
1.asp³ÌÐòÖÐ×÷base64±àÂëºÍ½âÂ룬ʹÓõÄÊÇmsxml×é¼þ£ ......

asp¶ÁÈ¡word ÎĵµÄÚÈÝת»»Îª¶þ½øÖÆÊý¾ÝÁ÷

Dim FilePath,FileName
Set ObjFileStream = Server.CreateObject("ADODB.Stream")
ObjFileStream.Type = 1
ObjFileStream.Mode = 3
ObjFileStream.open
ObjFileStream.LoadfromFile FilePath&"\"&FileName&".doc"
ObjFileStream.Position = 0
response.binarywrite  ......

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
¿ÉÊÇ»¹ÊÇÂÒÂë ......

ѧϰASPµÄ¸ÐÊÜ

      Õ⼸Ììѧϰ¶¯Ì¬ÍøÕ¾µÄÖÆ×÷£ºASP¡£ÓÉÓÚÀÏʦ½²µÄºÜÈÏÕæ£¬ºÜÏêϸ£¬¿Î³ÌÄÜÌý¶®£¬×Ô¼ºÒ²ÂòÁËÒ»±¾¹ØÓÚASPµÄÊé¼®£¬ASPµÄһЩ¹¦ÄܵÄʵÏÖ£¬Ôõô×ö³öÀ´ÄÜ¿´µÄ²î²»¶à£¬¿É¾ÍÊÇ×öµÄʱºòºÃ²î¾¢£¬²»ÊÇij¸öÓ¢Óïµ¥´Ê²»»áд£¬¾ÍÊÇÖØ¸´´íÎó³öÏÖ£¬Éî¿ÌµÄÃ÷°×£¬×öÍøÕ¾Ô­À´ÕâôÄÑ£¬²»½öÐèÒªÑϽ÷µÄÂß¼­Ë¼Î¬ÄÜÁ¦£¬¶ø ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ