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

aspµ¥Ò³Éú³É¾²Ì¬Ò³

½ñÌìÔÚÍøÉÏÕÒÁ˺þùØÓÚASPÉú³É¾²Ì¬Ò³µÄ´úÂë  ×î¶àµÄ¾ÍÊÇ FSO·½·¨£¬Ä£°å·½·¨£¬µ«²»ÖªµÀ£¬ÎÒ°Ñ´úÂëÄÃÀ´Ö®ºó¶¼²»ºÃÓ㬾ÍÊÇÌṩÏÂÔØµÄѹËõ°üÀïÃæÐ´ºÃµÄÎÒÔËÐж¼ÊÇÓдíÎ󡣡£
²»¹ý»ÆÌì²»¸ºÓÐÐÄÈË£¬ÎÒÖÕÓÚÕÒµ½Ò»¸öµ¥Ò³Éú³É¾²Ì¬µÄ·½·¨£¬ÄóöÀ´¸ø´ó¼Ò·ÖÏí
<!-- ======================== Éú³É¾²Ì¬·½·¨ ====================== -->
<%
Function GetPage(url)
'»ñµÃÎļþÄÚÈÝ
dim Retrieval
Set Retrieval = CreateObject("Microsoft.XMLHTTP")
With Retrieval
.Open "Get", url, False ', "", ""
.Send
GetPage = BytesToBstr(.ResponseBody)
End With
Set Retrieval = Nothing
End Function
Function BytesToBstr(body)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = "GB2312"
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
on error resume next
Url=" http://www.ent-wangchong.cn/index.asp"'Òª¶ÁÈ¡µÄÒ³ÃæµØÖ·
response.write "¿ªÊ¼¸üÐÂÊ×Ò³..."
wstr = GetPage(Url)
'response.write(wstr)
Set fs=Server.CreateObject("Scripting.FileSystemObject")
'if not MyFile.FolderExists(server.MapPath("/html/")) then
'MyFile.CreateFolder(server.MapPath("/html/"))'
'end if
'Òª´æ·ÅµÄÒ³ÃæµØÖ·
dizhi=server.MapPath("index.html")
If (fs.FileExists(dizhi)) Then
fs.DeleteFile(dizhi)
End If
Set CrFi=fs.CreateTextFile(dizhi)
Crfi.Writeline(wstr)
set CrFi=nothing
set fs=nothing
response.write "¸üÐÂÍê³É£¡"
response.End()
%>
±£´æÎªasp¾ÍÐУ¬ÐèÒªÉú³É£¬Ö´ÐÐÒ»ÏÂÕâ¸öÎļþ£¡


Ïà¹ØÎĵµ£º

ÔÚaspÖÐʹÓñäÁ¿ºÍ³£Á¿

 
ʹÓñäÁ¿ºÍ³£Á¿
±äÁ¿ÊǼÆËã»úÄÚ´æÖÐÒÑÃüÃûµÄ´æ´¢Î»Öã¬ÆäÖаüº¬ÁËÊý×Ö»ò×Ö·û´®µÈÊý¾Ý¡£±äÁ¿°üº¬µÄÐÅÏ¢±»³ÆÎª±äÁ¿µÄÖµ¡£±äÁ¿Ê¹ÓÃÓû§±ãÓÚÀí½â½Å±¾²Ù×÷µÄÃû³ÆÎªÓû§ÌṩÁËÒ»ÖÖ´æ´¢¡¢¼ìË÷ºÍ²Ù×÷Êý¾ÝµÄ;¾¶¡£
ÉùÃ÷ºÍÃüÃû±äÁ¿
ÃüÃûºÍÉùÃ÷±äÁ¿Ó¦×ñÑ­½Å±¾ÓïÑԵĹæÔò¼°Ö¸µ¼¡£¼´Ê¹ÔÚʹÓñäÁ¿Ç°²»ÐèҪȥÉùÃ÷±äÁ¿£¬Ò²Ó¦Ñ ......

¶¯Ì¬ÍøÒ³ASPÓïÑÔ»ù´¡(2)

´´½¨Ò»¸ö¼òµ¥µÄASPÒ³Ãæ
ÔÚ·þÎñÆ÷¶Ë±àдµÄÎļþ index.asp £º
ÒÔÏÂΪÒýÓÃÄÚÈÝ£º
<%@LANGUAGE="JSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"&g ......

aspÖÐʹÓÃFCKeditor´æÈ¡Êý¾Ýʱ³öÏÖÂÒÂëÎÊÌâ½â¾ö·½·¨

     °ÑFCKeditorǶÈëµ½ASPµ±ÖÐÓÃÀ´´æÈ¡Êý¾ÝºÍÉÏ´«Îļþʱ³öÏÖÁËÂÒÂëÎÊÌâ£¬ÍøÉϲéÁËϲÅÖªµÀ×Ô¼º×öASPÊÇgb2312µÄ±àÂ룬¶øfckeditorĬÈϵıàÂëÊÇutf-8,Òò´Ë³öÏÖÁËÂÒÂëÎÊÌâ¡£
    ÍøÉÏÕÒÁËһЩһЩ½â¾ö°ì·¨£¬×îÖÕÓÐÓõÄÄÃÀ´°É¡£ÔÚFCKeditor/editor/filemanager/connector/aspĿ¼ÏÂÓÐÁ½¸ö ......

¹ØÓÚ asp ľÂí

Ò»¡¢Ä¾ÂíÉú³É
aspľÂí´úÂë¼ÓÃÜ£¬Í¼Æ¬ºÏ²¢£¬Îļþʱ¼äÐ޸쬻¹ÓÐÒªÃüµÄϵͳ©¶´ÀûÓÃ
ͼƬºÍľÂíºÏ²¢ÃüÁ
copy 1.gif /b + asp.asp /a asp.gif
¶þ¡¢Ä¾ÂíÉÏ´«
Èç¹ûºǫ́ûÓÐÀàËÆÊý¾Ý¿â±¸·Ý¹¦ÄÜ£¬¿ÉÒÔÉú³ÉÐÂÎļþ£¬»òÕßÖ±½ÓÐÞ¸ÄÎļþ¡£ÄÇôºÜÄÑÖ±½ÓÈÃľÂíÔËÐУ¬²»¹ý»¹ÊÇÓÐһЩ·½·¨£¬¿ÉÒÔ¿¼ÂÇ¡£  
  1¡¢Èç¹ ......

¶¯Ì¬ÍøÒ³ASPÓïÑÔ»ù´¡(5)

±äÁ¿ÉêÃ÷£¬ÃüÃû¹æÔòÓëÔËËã·û
1£¬ÓÃÈýÖÖÓï¾äÀ´ÉùÃ÷±äÁ¿£ºdim £¬public Óë private £¬±È½Ï³£ÓõϹÊÇ dim ¡£
È磺<% dim a %> £»<% dim a , b , c %>
2£¬ÃüÃû¹æÔò£º
<1> ±äÁ¿µÄµÚÒ»¸ö×Ö·û±ØÐëÊÇ×Öĸ£¬Êý×ֺͷûºÅ¶¼²»ÐС£
<2> ²»ÄÜǶÈë¾äµã¡£
<3> ³¤¶È²»Äܳ¬¹ý255¸ö×Ö·û¡£
<4> ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ