PRISCILA STOCHINI

Acredito que não seja isso.. Quem pode verificar meu código, mando pra quem puder verificar pra mim.. Pessoal, me tira um dúvida... Resquest.Form -- Puxa do Formulario Requeste.QueryString -- Puxa do BD???

Vlw, deu certo...

Consegui passar essa parte..o que eu estou precisando agora é... Depois que eu consegui acessar apenas os dados de um usuario com um id especifico preciso fazer o update de alguns dados... tenho esse código... <% Vid = Request.Form("id") Vresposta = Request.Form("resposta") Vtecnico = Request.Form("tecnico") sql = "UPDATE suptec set tecnico = '"&Vtecnico&"', resposta='"&Vresposta&"', pendencia = false where id='"&Vid&"'" Set rs = bco.Execute(sql) %> e esse erro.. Microsoft JET Database Engine error '80040e07' Data type mismatch in criteria expression. /suporte/atualiza_suporte.asp, line 11 O que pode ser..???

Bom, Já tentei varias coisas... O que está acontecendo acho que não estou conseguindo passar os dados do form pra próxima página, me dem um dica!!! como faço isso..??? porque eu acho que não estou conseguindo passar os valores... Tenho esse código... <form name="sim" action="envia_DUVIDA.asp" method="post" enctype="multipart/form-data"> <input name="usuario" type="hidden" id="usuario" value="<%=rs("usuario")%>"/><%Response.Write("Vusuario")%> <input name="contato" type="hidden" id="contato" value="<%=rs("contato")%>"/><%Response.Write("Vcontato")%> <input name="codigo" type="hidden" id="codigo" value="<%=rs("codigo")%>"/><%Response.Write("Vcodigo")%> <input name="email" type="hidden" id="email" value="<%=rs("email")%>"/><%Response.Write("Vemail")%> e o aparece isso na tela.... Vusuario Vcontato Vcodigo Vemail Vddd Vtel Vsoftware Vversao Vrelease Vwin Vversaoauto Vtipo Vresumo Vduvida Vtecnico Vresposta

Meu problema é o seguinte... Tenho um formulario no qual o usuario cadastra seu dados e sua duvida e envia para um BD. Até ai tá tudo certo... Na mesma página do formulario o usuario pode clicar num link que vai para um página que tem um campo para ele anexar um arquivo. Meu problema está sendo cadastrar os dados desse usuario que solicita o link para anexo, porque não estou conseguindo repassar, transferir os dados, para cadastrar no BD, assim como cadastrar o neome do arquivo. porque não estou conseguindo, esse página que anexa, vai para um página que faz o upload desse arquivo para o servidor, envia um email com esse anexo e deleta o arquivo do banco... E não consigo colocar esse código Vusuario = UploadRequest.Item("usuario").Item("Value") com esse Vusuario = Request.Form("usuario") Alguém me de um luz, me ajude...Por favor...pe caso de vida ou morte isso... pelo menos uma ideia do que posso fazer...

Assim, tenho um relátorio e nele tem um campo resonder, quero que quando eu clique no link, ele pegue apenas os dados daquele usuario...

Esse valor será um id, campo de autonumeração do BD...

Pode me ajudar a resolver...isso... o que tenho que fazer???

Esse eu descobri, estava sql no meu Dim, e lá tava sq... Estou com outro agora... Microsoft JET Database Engine error '80040e14' Syntax error (missing operator) in query expression 'id ='. /suporte/resposta_suporte.asp, line 5 <% sql = "Select id, data, usuario, contato, codigo, email, ddd, tel, software, versao, release, win, versaoauto, tipo, resumo, duvida, arquivo, resposta, tecnico From suptec Where id = " & Vid Set rs = bco.Execute(sql) %>

Microsoft JET Database Engine error '80040e0c' Command text was not set for the command object. /suporte/resposta_suporte.asp, line 4 Quem poderia, me dar um luz do que esse erro está dizendo nas entrelinhas???

Pessoal, estou com o seguinte problema. Tenho um formulario que é possivel anexar arquivos e esse são enviado para um email da empresa especifico. O meu problema é não estou conseguindo gravar no banco as informações do formulario, como poderia fazer isso... a relação das minha página é.. FORMULARIO >> ENVIA BANCO SEM ANEXO... FORMULARIO >> LINK PARA PÁGINA QUE ANEXA ARQUIVO >> PÁGINA DE UPLOAD E ENVIO DE EMAIL... Não sei onde colocar para enviar para o banco..

A ideia do sistema no momento é... O usuario envia sua dúvida pelo site, e tem sua resposta também pelo site. Tenho um formulario que o usuario preenche e pode ou não anexar arquivos. Após o submit deste formulario, o usuario receber um email com a confirmação do cadastro, os dados e o NOME desse arquivo (se houver arquivo, se não tem que ir vazio) vão para um BD e se houver arquivo envia um email pra empresa com esse anexado. Tenho também o formulario de resposta que também poderá ou não anexar arquivos. Este tem que enviar email de resposta ao usuario tendo ou não tendo arquivos.Ao mesmo tempo tem que fazer o update dos dados resposndidos pelo tecnico no banco. Eu sei fazer tudo isso separado, mas quando junta...ferra tudo, estou precisando de uma ajuda mais experiente..

Microsoft JET Database Engine error '80040e14' Syntax error in INSERT INTO statement. /ASP/envia_suporte.asp, line 19 sql = "INSERT into tecnico(codigo, email, software, versao, proc, release, win, versaoAUTO, tipo, duvida, pendencia) values ('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&VversaoAUTO&"','"&Vtipo&"','"&Vduvida&"', '"&Vpendencia&"')" LINE 19 Set rs = bco.Execute(sql) Quem pode me ajudar??? É urgente..não estou achando o erro!!!

Problemas na linha 18 sql = "INSERT into tecnico(codigo, email, software, versao, proc, release, win, versaoAUTO, tipo, duvida) values ('"&Vcodigo&"','"&Vemail&"','"&Vsoftware&"', '"&Vversao&"', '"&Vproc&"','"&Vrelease&"','"&Vwin&"', '"&VversaoAUTO&"','"&Vtipo&"','"&Vduvida&"')" LINE 18 Set rs = bco.Execute(sql)

Bom, o que eu quero é um componente que envie email, e nesse possa até ter anexos... A minha ideia é ter um formulario no qual o usuario preencha e ao dar o submit o ususario receba um email de confirmação do cadastro e nós da empresa recebamos um email com o cadastro do usuario para que possamos cadastrar na nossa base. Estou utilizando Cdonts...como poderia enviar um email automatico de confirmação de cadastro...precisaria pegar o email que o usuario digitar no campo email do form.

<% Dim bco, sql, rs Set bco = server.CreateObject("ADODB.connection") bco.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("suporte.mdb") %>

Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x12d8 Thread 0xcd0 DBC 0x17de2b4 Jet'. /ASP/conectando.asp, line 4 tenho esse erro quem decifra pra mim???

A minha ideia é enviar um email de confirmação de cadastro...como faço isso...preciso pegar o email que o usuario digitou no formuario acima certo??? Quem pode me ajudar..

Como faço para enviar um email com cópia...

Pessoal, tenho que fazer um formulario que ao enviar os dados receba um email de confirmação do envio. Tipo uma resposta automatica. Como poderia fazer isso????

Quem pode me ajudar??????????

Da o mesmo erro se eu não anexar nada!!! ' Tipo de arquivo que esta sendo enviado tipo_arquivo = UploadRequest.Item("arquivo").Item("ContentType") ' Caminho completo dos arquivos enviados caminho_arquivo = UploadRequest.Item("arquivo").Item("FileName") ' Nome dos arquivos enviados nome_arquivo = Right(caminho_arquivo,Len(caminho_arquivo)-InstrRev(caminho_arquivo,"\")) ' Conteudo binario dos arquivos enviados arquivo = UploadRequest.Item("arquivo").Item("Value") [color=#FF0000]'pasta onde as imagens serao guardadas pasta = Server.MapPath("obras/") nome_arquivo = "/"&nome_arquivo ' pasta + nome dos arquivos Varquivo = "obras" + nome_arquivo ' Fazendo o Upload do arquivo selecionado if Varquivo <> "" then Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject") Set MyFile = ScriptObject.CreateTextFile(pasta & nome_arquivo) For i = 1 to LenB(arquivo) MyFile.Write chr(AscB(MidB(arquivo,i,1))) Next MyFile.Close end if[/color] Será que se eu tirar essa parte vermelha funciona do mesmo jeito...

Dá esse erro!!! Microsoft VBScript runtime error '800a0046' Permission denied /CONTROLE/envia_DUVIDA.asp, line 43 ' Fazendo o Upload do arquivo selecionado if Varquivo <> "" then Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject") LINE 43[color=#FF0000]Set MyFile = ScriptObject.CreateTextFile(pasta & nome_arquivo)[/color] For i = 1 to LenB(arquivo) MyFile.Write chr(AscB(MidB(arquivo,i,1))) Next MyFile.Close end if

Mudando um pouquinho de assunto qm pode me ajudar, não estou conseguindo fazer validar...qual pode ser o meu erro??? (...) <script Language="JavaScript"> function valida(creas_e_associacoes){ if (creas_e_associacoes.empresa.value == ""){ alert("Digite o nome da Empresa"); creas_e_associacoes.empresa.focus(); return (false); } return (true); } function valida(creas_e_associacoes){ if (creas_e_associacoes.depart.value == ""){ alert("Digite o Departamento"); creas_e_associacoes.depart.focus(); return (false); } return (true); } function valida(creas_e_associacoes){ if (creas_e_associacoes.contato.value == ""){ alert("Digite um nome para Contato"); creas_e_associacoes.contato.focus(); return (false); } return (true); } </script> <div id="Layer1" style="position:absolute; left:151px; top:75px; width:850px; height:515px; z-index:1; overflow: auto;"> <form name="creas_e_associacoes" method="post" action="envia_form_crea_e_associacoes.asp" language="JavaScript" onSubmit="return valida()"> <table border="1" cellspacing="0" cellpadding="6" width="776" align="center" bordercolor="#999999"> <tr> (..)

Qm pode me ajudar a resolver este problema... tenho um codigo do qual envia um anexo, mas se eu não anexar nada dá erro...o que eu posso fazer e aonde no meu codigo eu coloco algo???