Criando páginas

[leozeferino 0]

Olá.Estou fazendo um sistema para o usuario enviar textos. Esses textos vão para um banco de dados. Porém, gostaria de criar páginas com o texto.Procurei em alguns lugares e soube que pode-se criar páginas com o FSO, porém não sei como usa-lo. Alguém poderia me ajudar com um código para a criação de uma página em que seu conteudo seria uma variavel em asp?? Eu vou precisar de algum componente a mais no meu pc ou no meu servidor?Desde já,Valews!

[arr 0]

Um exemplo:

 

Set Conexao = Server.CreateObject("ADODB.Connection")Conexao.Open Application("StringConexaoODBC")Set RS = Server.CreateObject("ADODB.Recordset")RS.Open "SELECT Texto FROM tabela WHERE id=1",ConexaoNomeArquivo="minhapagina.htm"Set ObjFSO = Server.CreateObject("Scripting.FileSystemObject")Set MyFile = ObjFSO.CreateTextFile(c:\inetpub\wwwroot\suapasta\" & NomeArquivo)MyFile.Write RS("Texto")MyFile.CloseRS.CloseSet RS=NothingConexao.CloseSet Conexao=Nothing

 

Não esqueça que a pasta de gravação tem que ter permissão de escrita.

[leozeferino 0]

Como assim "permissão de escrita"?? Aonde é que eu faço isso??Obrigado!

[Mário Monteiro 179]

no diretorio onde for salvar ou alterar os arquivos

[leozeferino 0]

no diretorio onde for salvar ou alterar os arquivos

<{POST_SNAPBACK}>

Mas essa permissão eu tenho que pedir pro servidor?

E se pra testar no IIS? Aonde é que eu peço a permissão?

Aonde eu configuro ou mando configurar isso pra mim?

[Mário Monteiro 179]

isso o server tem de dar...mas especifica uma pasta pra isso não manda liberar todo seu dominio senão já viu né...

[leozeferino 0]

isso o server tem de dar...

 

mas especifica uma pasta pra isso não manda liberar todo seu dominio senão já viu né...

<{POST_SNAPBACK}>

eu estou testando o código no IIS mas ele fica carregando mó tempão. É normal?

[Mário Monteiro 179]

tem algum loop?? verifica se tem condição de saida...

[leozeferino 0]

Num tem não! Olha o código:

ASP

[*]<%

 

[*]Set Conexao = Server.CreateObject ("ADODB.Connection")

 

[*]Conexao.Open "DBQ=" & Server.MapPath("../../data/base.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

 

[*]

 

[*]

 

[*]Set RS = Server.CreateObject("ADODB.Recordset")

 

[*]RS.Open "SELECT * FROM Textos WHERE Texto_ID=8",Conexao

 

[*]

 

[*]NomeArquivo="minhapagina.html"

 

[*]

 

[*]Set ObjFSO = Server.CreateObject("Scripting.FileSystemObject")

 

[*]Set MyFile = ObjFSO.CreateTextFile("c:\inetpub\wwwroot\texto\fso\" & NomeArquivo)

 

[*]MyFile.Write RS("Texto")

 

[*]MyFile.Close

 

[*]

 

[*]response.write "Sucesso"

 

[*]

 

[*]RS.Close

 

[*]Set RS=Nothing

 

[*]

 

[*]Conexao.Close

 

[*]Set Conexao=Nothing

 

Eu não mexi em nada de permitir escrita. Tem q configurar alguma coisa?

[arr 0]

Clica com o botão direito na pasta fso

 

>>Propriedades>>Segurança e dá controle total para usuário anônimo (TODOS)

 

Tem que funcionar rapidinho.

Só para testar pode trocar essa linha para ver se o FSO está funcionando:

MyFile.Write "TESTE"

 

[]s

[leozeferino 0]

Clica com o botão direito na pasta fso

 

>>Propriedades>>Segurança e dá controle total para usuário anônimo (TODOS)

 

Tem que funcionar rapidinho.

Só para testar pode trocar essa linha para ver se o FSO está funcionando:

MyFile.Write "TESTE"

[]s

<{POST_SNAPBACK}>

Clica na pasta aonde? No diretório mesmo, no IIS ou no Dreamweaver? Não estou achando isso. Meu windows é o XP!