文件管理 · 2023年11月11日

asp文本文件|asp生成一个文本文件(非常简单)

㈠ 如何在asp中建一个文本文件

通过FSO来建立文件文件,其实很简单,通过下面的代码即可建立一个TEST的文本文件:

㈡ asp 写入文本文件

IIS的写入权限打开了还不行,因为你用的是FileSystemObject(FSO)组件写入的,所以,要打开FSO权限版<br>运行下面权的命令<br>Regsvr32 scrrun.dll那就是文件夹NTFS权限设置了在文件夹属性的安全里面,添加EveryOne组,然后把权限设置为所有

㈢ ASP中文本文件的创建、读取方法

File Access组件提供了访问计算机文件系统的方法和属性。我们可以使用File Access组件创建FileSystemObject对象,FileSystemObject对象有两种最常用的方法,一种用来创建文件,另一种是用来打开并读写文本文件。CreateTextFile方法获得你指定的文件名并创建该文件,它返回一个 TextStream对象,你可以用该对象在文件被创建后操作该文件,CreateTextFile方法的语法如下 : Set objTextStream=FileSystemObject.CreateTextFile(Filename,[Overwrite],[Unicode])下面作者给大家解释一下 CreateTextFile 方法的参数 1、Filename包含文件路径名的字符串,可以是文件的全路径名,包括驱动器名和目录名,或者也可以只是文件名,如果只包含文件名的话,文件将被创建在站点的根目录下。2、Overwrite布尔量,设置成False时可以防止FileSystemObject对象在创建一个新文件时删除已存在的文件,该参数是可选的,如果没有赋值系统默认为true,具有相同文件名的已有文件会被删掉。3、Unicode可选参数。布尔值指明是否以Unicode或ASCII文件格式创建文件。如果以Unicode文件格式创建文件,则该值为True;如果以ASCII文件格式创建文件,则该值为False。如果省略此部分,则假定创建ASCII文件。我们用 set ss=fs.CreateTextFile(syslog,ForWriting,false)来在log文件不存在的情况下创建文件并对文件进行写操作,这里的“ForWriting”表示写文件。与CreateTextFile方法不同,OpenTextFile方法用来获得你指定的文件名并打开该文件,利用它所带的参数我们可以对文件进行各种不同的操作和CreateTextFile方法一样,OpenTextFile 方法返回一个TextStream对象,使得你可以在文件被打开后操作该文件。OpenTextFile 方法的语法如下 : Set objTextStream=FileSystemObject.OpenTextFile(Filename,[IOmode],[Create],[Format]) 参数说明如下 : 1、Filename必须的变量,同CreateTextFile的filename2、IOmode可选的常量,取值为下列两个常数之一ForReading或ForAppending,如果mode为 1,文件以只读方式打开,如果为8,则文件以追加的方式打开。3、Create可选的布尔量,指定如果你想打开的文件不存在是做什么操作,如果其值为True,当文件不存在时就自动创建一个空的文件。如果为False,就会在文件没找到时产生一个出错信息,其默认值是False,建议将其设为True,以避免在打开文件时检查是否出错。 4、Format可选值,可以选择三种Tristate值分别指定文件的格式,-2、-1、和0分别对应于系统缺省、unicode和ASCII。在打开或创建了文本文件后,就得到一个TextStream对象,下面列出了TextStream对象的属性和方法TextStream.AtEndOfLine只读布尔量,当光标在当前行的末尾时,其值为true,否则为falseTextStream.AtEndOfStream只读布尔量,如果光标在流的末尾时,其值为true,否则为falseTextStream.Column只读的整数,统计从行首到当前光标位置之间的字符数TextStream.Line只读的整数,指明光标所在行在整个文件中的行号TextStream.close()关闭流以及对应的文本文件TextStream.read(Num)指定从光标的当前位置开始从文本文件中读取一定数目的字符TextStream.readall()将整个流读入一个字符串中TextStream.readline()将一整行的字符读入一个字符串中TextStream.write(text)将一个字符串写入流中TextStream.writeline()将一个文本串写入流中TextStream.skip(Num)在流中,将光标的位置移动一定数目的字符串长度TextStream.skiplines()在流中,将光标移动一定数目的行数TextStream.writeblank将一定数目的空行写入流中lines(num)

㈣ ASP读取文本文件啊

<html><head><http-equiv="Content-Type"content="text/html;charset=gb2312"><title></title></head><body><%LANGUAGE=VBScript%><%ConstForReading=1,ForWriting=2,ForAppending=8ConstTristateUseDefault=-2,TristateTrue=-1,TristateFalse=0Dimfilenamefilename="test.txt"’缺省相对路径是:winntSetfs=CreateObject("Scripting.FileSystemObject")Setf=fs.GetFile(filename)Setreadf=f.OpenAsTextStream(ForReading,TristateFalse)’第一个参数可选。输入/输出模式,是下列三个常数之一:’ForReading=1只读、ForWriting=2可读写或ForAppending=3追加’第二个参数也为可选。三个Tristate值之一,’指出以何种格式打开文件。忽略此参数,则文件以ASCII’格式打开。TristateUseDefault=-2以系统默认格式打开文件、’TristateTrue=-1以Unicode格式打开文件或TristateFalse=0’以ASCII格式打开文件。’也可用OpenTextFile方法打开文件s=readf.ReadLineDoWhilereadf.AtEndOfLine<>Trues=readf.ReadLineResponse.writes&""’逐行读文件并写出Loopreadf.close%></body></html>

㈤ asp 写入 文本文档

用fso的TextStream ,先读取文件然后用writeline写入 _________________________________________________________________ TextStream对象 TextStream对象具有一系列的方法和性质,这些方法和性质可以用于对某一文件进行操作或返回该文件的信息。 <% Set MagicFs = Server.CreateObject(“Scripting.FileSystemObject”) Set Magicfile=MagicFs.CreateTextFile(“c:\myfile.txt”,True) %> 方法 Close 关闭打开的文本流文件。 Read(characters) 读取文本流文件中一定数量的字符,并把它写入到一字符串中。 ReadAll 读取整个文本流文件(可能很大),并把它写入到字符串中。 ReadLine 读取文本流文件的一行,并把它写入字符串中。不包含新行符。 Skip(characters) 跳过文本流文件中指定数目的字符。 SkipLine 跳过文本流文件的一行。 Write(String) 往文本流文件内写入字符串,不包含新行符。 WriteBlankLine(Lines) 往文本流文件内写入指定数目的空行(新行符)。 WriteLine([String]) 往文本流文件内写入包含新行符的字符串。 性质 AtEndOfLine 如果遇到新行符,返回值TRUE;否则返回值为FALSE。 AtEndOfStream 如果到达文本流文件的结尾时,返回值为TRUE,否则返回值为FALSE。只在文本流文件是用于读取时。 Column 返回当前列在文本流文件中的列位置。 Line 返回当前行在文本流文件中的行位置。

㈥ ASP怎么以独占方式打开文本文件

思路是建立一个简易队列变量1。建立一个Application变量命名为"Queue",即Application("Queue")2。当需要操作文件时,先将自己的Session.SessionID存入该变量。3。然后开始查询Application("Queue")的第一个SessionID的值是否等于本身。(这是一个循环)4。当符合条件的时候,即可操作文件。5。当文件操作完毕后,即可将自身的SessionID 从Application("Queue")里面清除。这样即可保证同时只有一个人操作该文件。为防止客户端突然断线,在globe.asa文件中的Session_OnEnd过程中加入判断自身SessionID是否在Application("Queue")中的语句,如果存在则清除大概程序过程如下;Application.LockApplication("Queue") = Application("Queue") & Cstr(Session.SeesionID) & ","Application.UnlockDo while inStr(Application("Queue"),Cstr(Session.SessionID)) <> 1Loop文件操作语句Application.LockApplication("Queue") = Replace(Application("Queue"), Cstr(Session.SeesionID) & ",","")Application.Unlock在globe.asa的Session_OnEnd过程中也加入:Application.LockApplication("Queue") = Replace(Application("Queue"), Cstr(Session.SeesionID) & ",","")Application.Unlock

㈦ asp文件怎么用

1、什么是ASP ASP(ACTIVE SERVER PAGES)是微软公司开发的。它实际上是一个服务器端的脚本环境。当脚本运行在服务器端时,WEB服务器完成涉及回送浏览器HTML页的所有工作,并返回相应的HTML文本。 ASP在HTML文件中嵌入服务器端脚本(VBScript),开发与维护工作变得简单、快捷。 <html> <head> </head> <body> <% Response.Write("hello!") %> </body> </html> 同时,由于它是在服务器端的脚本,一般用户无法看到,从而有效地保证了系统的安全性及开发人员的知识产权。 同HTML文件一样ASP文件也是文本文件,包括文本、HTML标记和ASP脚本语句(用<%和%>界定符标记),它以.asp为扩展名。ASP提供VB SCRIPT和JSCRIPT两种脚本引擎,缺省为VB SCRIPT。 请求服务器执行asp脚本,——————————>返回html页面<—————————— 客户端(Client) Web服务器端(Server) 发出请求,要求执行服务器上的asp脚本,接收到html页面后,由客户机上的浏览器(IE)解释执行。将结果返回到浏览器窗口中。 请接到请求后。执行asp脚本,完成对数据库的操作,生成html页面,并将结果以html的方式返回给客户端。asp脚本必须放在服务器上,并由服务器解释执行 2、能够运行ASP的web服务器软件 IIS(internet information server)运行在windows2000环境 PWS(personal web server)运行在windows98环境

㈧ 用ASP怎么读取文本文件

'**************************************************'函数名:FSOFileRead'作 用:使用FSO读取文件内容的函数'参 数:filename —-文件名称'返回值:文件内容'************************************************** function FSOFileRead(filename) Dim objFSO,objCountFile,FiletempData Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True) FSOFileRead = objCountFile.ReadAll objCountFile.Close Set objCountFile=Nothing Set objFSO = Nothing End Function '**************************************************'函数名:FSOlinedit'作 用:使用FSO读取文件某一行的函数'参 数:filename —-文件名称' lineNum —-行数'返回值:文件该行内容'************************************************** function FSOlinedit(filename,lineNum) if linenum < 1 then exit function dim fso,f,temparray,tempcnt set fso = server.CreateObject("scripting.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),1) if not f.AtEndofStream then tempcnt = f.readall f.close set f = nothing temparray = split(tempcnt,chr(13)&chr(10)) if lineNum>ubound(temparray)+1 then exit function else FSOlinedit = temparray(lineNum-1) end if end if end function '**************************************************'函数名:FSOlinewrite'作 用:使用FSO写文件某一行的函数'参 数:filename —-文件名称' lineNum —-行数' Linecontent —-内容'返回值:无'************************************************** function FSOlinewrite(filename,lineNum,Linecontent) if linenum < 1 then exit function dim fso,f,temparray,tempCnt set fso = server.CreateObject("scripting.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),1) if not f.AtEndofStream then tempcnt = f.readall f.close temparray = split(tempcnt,chr(13)&chr(10)) if lineNum>ubound(temparray)+1 then exit function else temparray(lineNum-1) = lineContent end if tempcnt = join(temparray,chr(13)&chr(10)) set f = fso.createtextfile(server.mappath(filename),true) f.write tempcnt end if f.close set f = nothing end function

㈨ asp可以用文本编辑器打开吗

asp使用脚本语言,每次请求的时候,服务器调用脚本解析引擎来解析执行其中的程序代码,而ASP.NET则可以使用多种语言编写,而且是全编译执行的,比asp快,而且不仅仅是快的问题,有很多优点。asp文件都是文本形式的,可以用任何的文本编辑器打开,如notepad,editplus,dreamwaver,frontpage。但编辑aspx文件最好用VisualStudio.Net来编辑。aspx就是。net技术,它的安全性比较高,它与java是两个不同的分类,各有所长。只要是网页的源文件,都可以使用浏览器打开(IE、chrome、火狐等等几乎所有电脑上可以用来浏览网页的浏览器),由于aspx是动态文件,因此只能在服务器上才能正常浏览,如果把aspx文件直接用鼠标点中然后拖入浏览器窗口,这样只能用于打开查看ASPX文件的代码,而看到源代码显示出来的效果,更不能对其代码进行编辑。如果您需要打开并编辑aspx文件。

㈩ asp生成一个文本文件(非常简单)

<%'下面是保存函数Function SaveToFile(ByVal strBody, ByVal File) Dim objStream Dim RText RText = Array(0, "") Set objStream = Server.CreateObject("ADODB.Stream") With objStream .Type = 2 .Open .Charset = "utf-8" .Position = objStream.Size .WriteText = strBody On Error Resume Next .SaveToFile Server.MapPath(File), 2 If Err Then RText = Array(Err.Number, Err.Description) SaveToFile = RText Err.Clear Exit Function End If .Close End With RText = Array(0, "保存文件成功!") SaveToFile = RText Set objStream = NothingEnd Function%>调用 SaveToFile(文本内容,文件路径)剩下的自己会写了吧