Ir para conteúdo
Fórum Script Brasil
  • 0

Notepad


Guest James

Pergunta

Ae galera beleza??

e o seguinte eu tenho no meu formulário 2 campos nome e endereco e gostaria de guardar essas informções em um arquivo txt alguém sabe como fazer isso.. se alguém tiver um exemplo que possa me mostrar valeu

preciso guardar no arquivo texto de qualquer geito

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
Ae galera beleza??

e o seguinte eu tenho no meu formulário 2 campos nome e endereco e gostaria de guardar essas informções em um arquivo txt alguém sabe como fazer isso.. se alguém tiver um exemplo que possa me mostrar valeu

preciso guardar no arquivo texto de qualquer geito

Você pode guardar os dadosem um banco de dados... Em um txt nunca fiz e nem sei se tem como, mas acredito que não tem como.... Se tiver como falem ai!!! wink.gif

Abraços,

[]'s

Victor

Link para o comentário
Compartilhar em outros sites

  • 0

Salve Grande, olha so eu tenho exemplo aqui para um livro de visitas que tinha .. era um que baixei aqui na script brasil, olhe se pode ajudar você

Abraços .. qualquer duvida sobre ele posta ai ..que te ajudaremos

Formulario

<form name="form" method="POST" action="resposta.asp">

  <table border="0" width="100%">

    <tr>

      <td width="50%">

        <p align="center"><b>Nome:</b> <input class="input" type="text" name="txtNome" size="20"></td>

      <td width="50%">

        <p align="center"><b>Email:</b> <input class="input" type="text" name="txtEmail" size="20"></td>

    </tr>

  </table>

  <p align="center" style="margin-top: 3; margin-bottom: 3"><b>Mensagem:</b></p>

  <p align="center" style="margin-top: 3; margin-bottom: 3"><textarea class="input" name="txtMensagem" rows="10" name="S1" cols="49"></textarea></p>

  <p align="center"><input class="button" type="submit" value="Enviar" name="B1" onclick="return valida(this.form)">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

  <input class="button" type="reset" value="Limpar" name="B2"></p>

</form>

Agora o arquivo resposta.asp

<!--#include file="fobjvbs.inc"-->

<body bgcolor="#FFFFFF" topmargin="0" leftmargin="0">

<table border="0" width="100%" bgcolor="#083E80">

<tr>

  <td width="141%">

    <p align="center"><img border="0" src="Imagens/livrovisita.gif" width="155" height="22">

    </td>

</tr>

</table>

<%

Dim Data, Objeto, Contt, Cont, Obj, Texto

Data = cstr(day(date) & "/" & month(date) & "/" & year(date))

Set Objeto = CreateObject("Scripting.FileSystemObject")

Set Contt = Objeto.OpenTextFile(Server.MapPath("cont.txt"))

Cont = Contt.ReadAll

Cont = Cont + 1

Contt.close

Set Contt = Objeto.CreateTextFile(Server.MapPath("cont.txt"))

Contt.WriteLine(cont)

Contt.close

Set Obj  = Objeto.GetFile(Server.MapPath("Mensagens.txt"))

Set Texto = Objeto.OpenTextFile(Server.MapPath("Mensagens.txt"), forAppending, true)

Texto.WriteLine("<" & Cont)

Texto.WriteLine("<b>Data:</b> " & Data)

Texto.WriteLine("<b>Nome:</b> <i>" & request.form("txtNome") & "</i>")

Texto.WriteLine("<b>Email:</b> <i>" & request.form("txtEmail") & "</i>")

Texto.WriteLine("<b>Mensagem:</b> ")

Texto.WriteLine(request.form("txtMensagem"))

Texto.WriteLine(Cont & ">")

Texto.write("")

Texto.close

%>

<p align="center">&nbsp;</p>

<p align="center">&nbsp;</p>

<p align="center"><big><font color="#FF0000">Seus dados foram adicionado ao </font></big></p>

<p align="center"><big><font color="#FF0000">Livro de Visitas com Sucesso</font></big></p>

<p align="center">&nbsp;

<p align="center"> <a class="mais" href="Fac_alu_LivroV.asp">Visualizar Minha

  Assinatura!</a>

<p align="center"><big><font color="#FF0000">

</font>

</body>

</html>

Ai para funcionar você precisa de 3 arquivos

1 chamado cont.txt outro mensagens.txt

no cont funciona como um marcador dizendo quantos, já enviaram dados

e o mensagem registrava as mesagens enviadas

você também precisa do arquivo

fobjvbs.inc

Olhe a estrutura do arquivo para você ver como é.

<%
'===============================================================
' Type Info: IOMode, TypeInfo Version 0.000
' GUID: {00000000-0000-0000-0000-000000000000}
' LCID: 0X00000000
' TypeKind: enum
'---------------------------------------------------------------

' Variable/Constant: ForReading
' 
Const ForReading = 1

' Variable/Constant: ForWriting
' 
Const ForWriting  = 2

' Variable/Constant: ForAppending
' 
Const ForAppending = 8

'===============================================================
' Type Info: Tristate, TypeInfo Version 0.000
' GUID: {00000000-0000-0000-0000-000000000000}
' LCID: 0X00000000
' TypeKind: enum
'---------------------------------------------------------------

' Variable/Constant: TristateTrue
' 
Const TristateTrue = -1

' Variable/Constant: TristateFalse
' 
Const TristateFalse = 0

' Variable/Constant: TristateUseDefault
' 
Const TristateUseDefault = -2

' Variable/Constant: TristateMixed
' 
Const TristateMixed = -2
%>

Abraços e espero que o ajude

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...