ler o conteúdo de um arquivo

[xanburzum 169]

A função lerarq permite ler o conteúdo de um arquivo,lerarq

tem um argumento necessário, caminho, que o caminho para um arquivo já existente no servidor. A função retorna uma string readfile

representando o conteúdo do arquivo. Readfile retorna nulo na

eventualidade de um erro.

 

sintaxe:

 

string = lerarq(pathname)

exemplo:

 

Grava o conteúdo do arquivo arquivo.txt na nova pasta.

 

<% = lerarq( server.mappath("/nova pasta/arquivo.txt") ) %>

Grava o conteúdo do arquivo arquivo.txt na nova pasta para uma variável chamada teste.

 

<%
dim teste
teste = lerarq( server.mappath("/nova pasta/arquivo.txt") )
%>

 

code:

 

<%
Private Function lerarq(byVal pathname)
	dim objFSO, objFile, tmp
	On Error Resume Next
	Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
	Set objFile = objFSO.OpenTextFile(pathname, 1, False)
	tmp = objFile.ReadAll
	If Err Then
		lerarq= Null
	Else
		lerarq= tmp
	End If
	objFile.Close
	Set objFile = Nothing
	Set objFSO = Nothing
	On Error GoTo 0
End Function
%>

[augustoclaro 2]

muito bom!

 

obrigado!