Arquivos em ASP [RESOLVIDO]

Assuntos Gerais
#1

Pessoa, preciso de uma ajuda,

Sou completamente leigo em ASP, me surgiu uma urgencia e eu preciso fazer um script em asp para ler um arquivo e escrever nele,
eu cheguei nisso:

<%

Dim objFSO, objCreatedFile, objOpenedFile
Const ForReading = 1, ForWriting = 2, ForAppending = 8

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objOpenedFile = objFSO.OpenTextFile("c:\teste.txt", ForWriting, True)

objTextFile.Write ("Escrevendo...")

objTextFile.Close


%>

Mas a pagina da erro, e nao diz qual erro, alguem pode dar uma luz?

#2

Adoro o ASP porque ele não mostra os erros de forma inteligível por humanos.

Set objOpenedFile = objFSO.OpenTextFile("c:\teste.txt", ForWriting, True)

Isso me parece ser um problema de permissão, ache algum diretório que tenha permissões adequadas para o serviço do IIS. (Fale com alguém aí no seu serviço onde é que tem um diretório desses, já que você só está dando manutenção, certo?)

#3

[quote=neno]Pessoa, preciso de uma ajuda,

Sou completamente leigo em ASP, me surgiu uma urgencia e eu preciso fazer um script em asp para ler um arquivo e escrever nele,
eu cheguei nisso:

<%

Dim objFSO, objCreatedFile, objOpenedFile
Const ForReading = 1, ForWriting = 2, ForAppending = 8

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objOpenedFile = objFSO.OpenTextFile("c:\teste.txt", ForWriting, True)

objTextFile.Write ("Escrevendo...")

objTextFile.Close


%>

Mas a pagina da erro, e nao diz qual erro, alguem pode dar uma luz?

[/quote]

Nao entendi! Se nao diz qual o erro, como vc sabe que esta dando erro? :slight_smile:

#4

O ASP é assim - por default, ele só indica que houve um erro 500, mas não diz qual é. É por isso que adoro o ASP :frowning:

#5

[quote=entanglement]O ASP é assim - por default, ele só indica que houve um erro 500, mas não diz qual é. É por isso que adoro o ASP :frowning:
[/quote]

Pois é :cry:

#6

O que vc deve ter um mente eh que vc esta tentando acessar um arquivo no disco local, provavelmente vc tem que dar permissao para isso.

Outra coisa, quando vc especificar paths no windows, eh sempre bom colocar uma segunda \ :

Set objOpenedFile = objFSO.OpenTextFile("c:\\teste.txt", ForWriting, True)
#7

Se bem que no caso específico do VBScript (que é essa linguagem usada pelo ASP) não é para duplicar as contrabarras :frowning:

#8

[quote=entanglement]Se bem que no caso específico do VBScript (que é essa linguagem usada pelo ASP) não é para duplicar as contrabarras :frowning:
[/quote]
Ah eh verdade. Barra nao eh necessario. Acho que VBScript eh necessario somente para aspas.

#9

Valeu!
E isso mesmo, permissao, coloquei o arquivo na pasta local do servidor e funcionou!
Valeu Galera pelas dicas, topico resolvido

Abs!

#10

[quote=neno][quote=windsofhell]
O que vc deve ter um mente eh que vc esta tentando acessar um arquivo no disco local, provavelmente vc tem que dar permissao para isso.

Outra coisa, quando vc especificar paths no windows, eh sempre bom colocar uma segunda \ :

Set objOpenedFile = objFSO.OpenTextFile("c:\\teste.txt", ForWriting, True)

[/quote]

Valeu!
E isso mesmo, permissao, coloquei o arquivo na pasta local do servidor e funcionou!
Valeu Galera pelas dicas, topico resolvido

Abs![/quote]

Maravilha! Edita o topico e coloca [Resolvido] na frente do titulo do topico.

#11