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

asp ²Ù×÷ txt Îı¾Îļþ

 ´´½¨Ö¸¶¨µÄÎļþÃû²¢·µ»ØÒ»¸ö TextStream ¶ÔÏ󣬿ÉÒÔʹÓÃÕâ¸ö¶ÔÏó¶ÔÎļþ½øÐжÁд¡£
object.CreateTextFile(filename[, overwrite[, unicode]])
²ÎÊý
object
±ØÑ¡ÏӦΪ FileSystemObject »ò Folder ¶ÔÏóµÄÃû³Æ¡£
filename
±ØÑ¡Ïî¡£Ö¸Ã÷ËùÒª´´½¨ÎļþµÄ×Ö·û´®±í´ïʽ¡£
overwrite
¿ÉÑ¡Ïî¡£Boolean Öµ£¬Ö¸Ã÷ÄÜ·ñ¸²¸ÇÒÑÓÐÎļþ¡£Èç¹ûÎļþ¿ÉÒÔ¸²¸Ç£¬ÔòֵΪ true £¬·ñÔòΪ false¡£Èç¹ûºöÂÔ£¬ÔòÒÑÓÐÎļþ²»Äܱ»¸²¸Ç¡£
unicode
¿ÉÑ¡Ïî¡£Boolean Öµ£¬Ö¸Ã÷ÎļþÊÇ·ñÒÔ Unicode »ò ASCII Îļþ·½Ê½´´½¨¡£Èç¹ûÎļþ×÷Ϊ Unicode Îļþ´´½¨£¬ÔòֵΪ true £¬Èç¹û×÷Ϊ ASCII Îļþ´´½¨£¬ÔòΪ false¡£Èç¹ûºöÂÔ£¬Ôò¼Ù¶¨Îª ASCII Îļþ¡£
˵Ã÷
ÏÂÃæµÄ´úÂë˵Ã÷ÁËÈçºÎʹÓà CreateTextFile ·½·¨À´´´½¨ºÍ´ò¿ªÒ»¸öÎı¾Îļþ¡£
[JScript]
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateTextFile("c:\\testfile.txt", true);
a.WriteLine("This is a test.");
a.Close();
[VBScript]
Sub CreateAfile
   Dim fso, MyFile
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)
   MyFile.WriteLine("This is a test.")
   MyFile.Close
End Sub
Èç¹û overwrite ²ÎÊýÊÇ false £¬»òÕßûÓÐÌṩÕâ¸ö²ÎÊý£¬ÄÇô¶ÔÓÚÒÑÓÐµÄ filename ½«²úÉúÒ»¸ö´íÎó¡£
´ò¿ªÖ¸¶¨µÄÎļþ²¢·µ»ØÒ»¸ö TextStream ¶ÔÏ󣬿ÉÒÔͨ¹ýÕâ¸ö¶ÔÏó¶ÔÎļþ½øÐжÁ¡¢Ð´»ò×·¼Ó¡£
object.OpenTextFile(filename[, iomode[, create[, format]]])
²ÎÊý
object
±ØÑ¡Ïî¡£object ӦΪ FileSystemObject µÄÃû³Æ¡£
filename
±ØÑ¡Ïî¡£Ö¸Ã÷Òª´ò¿ªÎļþµÄ×Ö·û´®±í´ïʽ¡£
iomode
¿ÉÑ¡Ïî¡£¿ÉÒÔÊÇÈý¸ö³£ÊýÖ®Ò»£ºForReading ¡¢ ForWriting »ò ForAppending ¡£
create
¿ÉÑ¡Ïî¡£Boolean Öµ£¬Ö¸Ã÷µ±Ö¸¶¨µÄ filename ²»´æÔÚʱÊÇ·ñ´´½¨ÐÂÎļþ¡£Èç¹û´´½¨ÐÂÎļþÔòֵΪ True £¬Èç¹û²»´´½¨ÔòΪ False ¡£Èç¹ûºöÂÔ£¬Ôò²»´´½¨ÐÂÎļþ¡£
format
¿ÉÑ¡ÏʹÓÃÈýֵ̬ÖеÄÒ»¸öÀ´Ö¸Ã÷´ò¿ªÎļþµÄ¸ñʽ¡£Èç¹ûºöÂÔ£¬ÄÇôÎļþ½«ÒÔ ASCII ¸ñʽ´ò¿ª¡£
ÉèÖÃ
iomode ²ÎÊý¿ÉÒÔÊÇÏÂÁÐÉèÖÃÖеÄÈÎÒ»ÖÖ£º
³£Êý Öµ ÃèÊö
ForReading 1 ÒÔÖ»¶Á·½Ê½´ò¿ªÎļþ¡£²»ÄÜдÕâ¸öÎļþ¡£
ForWriting 2


Ïà¹ØÎĵµ£º

asp ʵÏÖµÄðÅÝÅÅÐò³ÌÐò

 arr = array(12,52,14,43,24,58,15,64,24,57,17,56,45)
arrLen = ubound(arr)
for i=0 to arrLen-1
for j = 0 to (arrlen -1)-i
if arr(j)>arr(j+1) then
temp = arr(j)
arr(j)= arr(j+1)
arr(j+1) = temp
end if
next
next

for each l in arr
response.Write l&"< ......

aspÖÐʹÓÃdiv·½·¨£¡

      ǰÁ½Ì죬¿Í»§ÐèÒªÌí¼ÓÏÂÀ­²Ëµ¥£¬ÎÒÔεĺܣ¬ºÜ¼òµ¥µÄÒ»¸öÎÊÌâ°ÑÎÒÓÕµ¼ÁËÁ½ÈýÌ죬ºóÀ´ÐÑÎò¹ýÀ´£¬ÕæÏë´ò×Ô¼º¡£
      ֮ǰÎÒҲʹÓùýdivÌ×divµÄ·½·¨£¬Ö»Òª¿ØÖÆËûÃǵÄλÖþͿÉÒÔÁË£¬µ«Õâ´ÎÎÒûÓУ¬Ê¹ÓõÄÔÚ±í¸ñʽÌ×div£¬×Ô¼º×ÁÄ¥Á˰ëÌ죬ÒѾ­Íü¼ÇÁËdivËùÏÔʾµÄÊÇÏà¶Ô ......

¹ØÓÚѧºÃasp¼°asp.netµÄ¾­Àú

      ¶ÔÓÚÒ»¸öÏëѧºÃASP¼°asp.netµÄ¹ýÀ´ÈËÀ´Ëµ,ѧϰµÄ¹ý³ÌÊÇÓÐȤ¼°ÕÛÄ¥È˵Ä,µ±Äã×ö³öµÚÒ»¸öʵÑéµÄʱºòÄãµÄÐÄÇéÊǼ¤¶¯µÄ,ÎÒÊDZÏÒµÒÔÀ´Ò»²½Ò»²½µÄ×Ôѧ¹ý³ÌÖÐ×ܽáÁËһЩºÃµÄ¾­ÑéÈÿ´µ½ÕâÆªÎÄÕµÄÈËÉÙ×ßһЩÍä·,ÏÂÃæÐ´µÄ¶¼ÊÇÕë¶Ô³õѧÕß,Ò²ÊÇÎÒ×Ô¼ºÊÇÔõô´ÓÁã»ù´¡µ½ÏÖÔÚ¿ÉÒÔ¿ª·¢Ò»Ð©¶«Î÷µÄ¹ý³Ì.
&nb ......

ASPÒ»¾ä»°ÇáËÉ»ñÈ¡ÓòÉϵÄÓû§Ãû

 ·Ï»°ÉÙ˵,¼û´úÂë
<%=request.ServerVariables("LOGON_USER")%>
Ê×ÏÈIISËùÔڵķþÎñÆ÷Òª¼ÓÈëÓò,Æä´ÎÊÇIIS·þÎñÆ÷µÄÉèÖÃ.¼ûͼ1
ͼ2
·þÎñÆ÷ÉèÖúúó, IISËùÔڵķþÎñÆ÷ʹÓÃ
<%=request.ServerVariables("LOGON_USER")%> 
¾ÍÄÜ»ñÈ¡µ½ÓòÃû³ÆºÍÓû§ÃûÁË.
Èç¹û·ÃÎÊÕßûÓмÓÈëÓò,»áÌáʾµÇ¼,ÈçÏÂͼ.Ê ......

ASP¸ß¼¶¼¼Êõ¾«Ñ¡¼¯

ASP¸ß¼¶¼¼Êõ¾«Ñ¡¼¯
 
Ò»¡¢GetRowsµÄʹÓ÷½·¨£º
<%
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("test.mdb")
Set Rs=Server.CreateObject("Adodb.Recordset")
Rs.Open "Select Top 2 * from ±íÃû",conn,0,1 &nb ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ