Jump to content


Flavio A.

Member Since 11/03/2010
Offline Last Active 26/08/2010, 00:42
-----

Topics I've Started

Variável Não Atua Na Hora De Modificar O Arquivo

07/05/2010, 17:07

pessoal. puxo de um banco de dados os itens de LINK, como podem ver abaixo:

strQuery = "SELECT * FROM minhatabela order by numero desc"

e lá na frente peço o conteudo de LINK

<input type="text" name="nomedoarquivoescolhido" value="<%Response.Write RS("link")%>">

(omiti o restante do codigo pra nao ficar enorme) tudo funciona beleza.

na pagina de ação do formulario.. tenho isso

<%

dim nomearquivo
nomearquivo = Request.form("nomedoarquivoescolhido")

Set fso = CreateObject("Scripting.FileSystemObject")
ForReading = 1
str_arquivo="e:\home\alaimmoreira\web\jpturismo\" & nomearquivo & +".asp"

Set str_fso = nothing

if Request.form("btsalva") = "salvar" then
texto = Request.Form("arquivo")
Set salvando = fso.CreateTextFile(str_arquivo,True)
salvando.WriteLine texto
Set salvando = nothing
Response.Write "Arquivo Salvo"
end if

If (fso.FileExists(str_arquivo)) Then
%>
</p>
<p align="center">&nbsp;</p>
<form action="ADM01-1c.asp" method="post" id="frm_txt" name="frm_txt">
<p align="center">
<input type="text" name="espelhodonome" size="20" value="<% response.write nomearquivo %>"></p>
</p>
<p align="center">
<textarea id="arquivo" name="arquivo" rows="15" cols="60">
<%

Set str_fso = fso.OpenTextFile(str_arquivo,ForReading,True)
While (not str_fso.AtEndOfStream)
campo = str_fso.readline
response.write(Server.HTMLEncode(campo) & CHR(13))
wend

%>
</textarea>
<br>
<br>
<input type="submit" id="btsalva" name="btsalva" value="&lt; Fazer alterações &gt;" style="font-family: Lucida Sans Unicode; font-weight: bold; font-size: 8pt" />
</p>
</form>
<%
Else
response.write "Erro ao tentar encontrar o arquivo"
End If

set fso = nothing
%>
P.S: ADM01-1c.asp é a mesma pagina acima.
tudo funciona beleza. ele abre o conteudo do LINK que eu escolhi. só que na hora de salvar o arquivo.. ele não salva.
na hora que ele executa a ação do formulario
<form action="ADM01-1c.asp" method="post" id="frm_txt" name="frm_txt">

ele mostra o arquivo de LINK (do banco de dados) mas ao invés de ser o que eu escolhi.. ele abre o que está em primeiro no banco de dados.
e não reconhece a variavel do nome do arquivo na hora de salvar!

como resolvo isso? por favor.. agradeço muito a quem ajudar!

Fazer Include Com Variável

11/03/2010, 01:05

Pessoal,
estou montando um site com conteúdo renovado diariamente. para tal, preciso de uma maneira para que - futuramente - se eu precisar renovar o layout, eu não precise sair mudando o layout de cada pagina com noticias novas.. afinal de contas.. dentro de 1 ano já serão milhares de páginas!

tinha pensado em Query String (aqueles links dinamicos tipo pagina.asp?noticia=nomedanoticia)
mas para fazer a pagina de arquivo, por exemplo, eu precisaria de uma lista ENORME!

Por isso pensei em fazer um esquema onde isso acontecesse:

pagina.asp?noticia=QUALQUER_COISA_QUE_SE_DIGITAR

onde o script faria o include em na pagina do arquivo "QUALQUER_COISA_QUE_SE_DIGITAR.asp"

alguém sabe fazer isso?

agradeço imensamente quem puder ajudar!

IPB Skin By Virteq