Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

elvisdegan

erro (0x800A0046)

Recommended Posts

http://forum.imasters.com.br/public/style_emoticons/default/bye1.gif

Ola pessoal, alguem pode me dizer como gravar arquivo de texto no usuario?

 

ta dando um erro de permissao, ja até coloquei na web pra testar mas ta dando pau, como eu faco ?

 

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A0046)

Permissão negada

 

 

<%

Dim fs, f, ts, s

Set fs = CreateObject("Scripting.FileSystemObject")

fs.CreateTextFile "c:\test1.txt" 'Criar um arquivo

Set f = fs.GetFile("c:\test1.txt")

Set ts = f.OpenAsTextStream(2, -2)

ts.Write newline

 

ts.Close

 

%>

 

quando eu tento usar as tags do vbscript nao da erro mas tabem nao grava

 

 

<script language="vbscript">

Dim fs, f, ts, s

Set fs = CreateObject("Scripting.FileSystemObject")

fs.CreateTextFile "c:\test1.txt" 'Criar um arquivo

Set f = fs.GetFile("c:\test1.txt")

Set ts = f.OpenAsTextStream(2, -2)

ts.Write newline

'nome da variavel com o conteudo

ts.Close

</script>

 

 

como posso fazer?

Compartilhar este post


Link para o post
Compartilhar em outros sites

olha só, consegui liberar para rodar localmente, mas não to conseguindo da web salvar arquivos .txt no meu pc, da erro mas nao aparece qual. Este codigo funciona tbem na web?

Compartilhar este post


Link para o post
Compartilhar em outros sites

sim funcionam na web mas para salvar arquivos lá e não no seu pc...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.