jow
-
Total de itens
546 -
Registro em
-
Última visita
Tudo que jow postou
-
Boa tarde como gravar Dados de data e hora do SERVIDOR, em uma tabela do banco de dados ???
-
não tá axando o caminho do banco de dados ... você tá usando o caminho como se estivesse no C:/ ... você tem q jogar o banco na net ... e digitar o caminho na sua conexão
-
Então é só você colocar as tabelas no corpo da mensagem do email ... e dentro das tabelas exibir o q você quer q exiba.
-
Está no banco de dados esse email tem q ser o mesmo do usuário logado ...
-
Tira esse campos 0,0 e creio q seja isso ..
-
cara você tá usando um apostrófe a mais na ''$descrição2' tenta sem esse apostrófe deve ser isso ... $sql = ("UPDATE CADcategoria SET 'Categoria' = '$categoria2', 'Descricao' = '$descricao2' WHERE 'Categoria' = '$id'");
-
não cara olha só você tem um formulário onde aparecem os dados a serem alterados certo ?? então depois do <input> do último campo você usa <input type="hidden" name="id" value="<%=tab("id")%>"> esse input vai pegar o seu ID ... na página de UPDATE é só você trazer esse ID através do id = Request.Form("id") e ai é só você usar ele no seu UPDATE. Qualquer dúvida é só você postar ai o código do seu formulário e também da sua página onde está o seu UPDATE ...
-
opá cara cadê a sua linha se UPDATE onde você atualiza os dados ... já vou te adiantando q no seu formulário de UPDATE você tem q usar um campo oculto para pegar o id, na página onde você executa o UPDATE você usa id = Request.Form("id") para pegar o valor do ID do formulário ... Só isso hehe
-
ixi viajei nessa só faltou colocar um nome no formulario assim: name="form" kkkkkkkkkkkkk
-
kkkkkkkkkkkkkkkkkkkkkkkk ... ae aproveitando dá uma olhada ai no fórun q postei um dúvida quase agora e vê se você consegue me ajudar ...
-
opá cara esse meu está correto estou respondendo o tópico acima kkkkkkkkkkkkkk
-
opá brother beleza ... dá uma olhada ai no meu UPDATE ... <% if session("login") <> true then response.redirect "default.asp" end if %> <!--#include file="config/conexao.asp"--> <% call abre_conectar 'Atrubuição dos valores as respectivas variáveis titulo = Request.Form("titulo") data = Request.Form("data") hora = Request.Form("hora") obs = Request.Form("obs") convidar = Request.Form("convidar") 'foto = Request.Form("foto") 'if foto = "" then 'foto = " " 'end if 'if comentario = "" then 'comentario = " " 'end if id = Request.Form("id") 'não vou permitir a alteração da foto senão você já viu néw 'strQuery = "UPDATE contato SET nome = '"&nome&"', telefone='"&telefone&"', email='"&email&"', comentario='"&comentario&"', foto = '"&foto&"' WHERE autonum ="&autonum sql = "UPDATE agenda SET titulo = '"&titulo&"', data='"&data&"', hora='"&hora&"', obs='"&obs&"', convidar='"&convidar&"' WHERE id ="&id 'Caso ocorra um erro esta função de erro será chamada On error Resume Next 'Executaa inserção no Banco de Dados set tab = cnn.execute(sql) 'Fecha o Objeto de Conexão call fecha_conectar set tab = nothing if err = 0 Then 'Redireciona o usuário caso não tenha ocorrido erro na transação response.redirect "sucesso.asp" end if %>
-
<% if session("login") <> true then response.redirect "default.asp" end if %> <head> <script language="javascript"> function valida_campo() { <!-- var login = document.form.login.value if (login==""){ alert("Informe com um login!"); document.form.login.focus() return false } var senha = document.form.senha.value if (senha==""){ alert("Informe com um titulo!"); document.form.senha.focus() return false } var email=document.form.email.value; if (email==""){ alert("Informe um E-mail!") document.form.email.focus() return false } } function confere(){ if (document.form.email.value.indexOf('@', 0) == -1 || document.form.email.value.indexOf('.', 0) == -1){ alert("E-mail invalido!"); document.form.email.focus() } } } //--> </script></head> <table width="100%" height="480" border="0"> <tr> <td width="14%" valign="top"> </td> <td width="86%" height="32"> </td> </tr> <!-- Menu Topo --> <tr> <td valign="top"> </td> <td height="42"><div align="left">Incluir <a href="form_exclui_membros.asp">Excluir</a> <a href="escolhe_pra_alterar_membros.asp">Alterar</a> <a href="pesquisar_membros.asp">Ver Todos</a></div></td> </tr> <!-- Links Esquerda --> <!--#include file="includes/links.asp"--> <!-- Corpo da página --> <tr> <td valign="top" nowrap scope="col"><div align="left"> <!-- #include file="config/conexao.asp"--> <% call abre_conectar sql = "Select * from membros" set tab = cnn.execute(sql) %> </div>Usuário: <%Response.write(Session("nome")) %> <a href="logout.asp">(Sair) </a> <div class=h3> <div align="left">Incluir membros</div> <div align="center" class="style4">os campos com (*) são obigatórios</div> </div> <form action="inserir_membro.asp" method="post" onSubmit="return valida_campo()"> <table width="100%" border="0"> <tr> <td width="11%">Nome:</td> <td width="89%"><input type="text" name="nome"></td></tr> <tr> <td>Email:</td> <td><input type="text" name="email"></td></tr> <tr> <td>Celular:</td> <td><input type="text" name="celular"></td></tr> <tr> <td>Login:</td> <td><input type="text" name="login"> <span class="style4">*</span></td> </tr> <tr> <td>Senha:</td> <td><input type="password" name="senha"> <span class="style4">*</span></td> </tr> <tr> <td><input type="submit" value="Salvar"></td> <td><input type="reset" value="Limpar"></td> <!--<td><a href="escolhe_pra_alterar_clientes.asp">Alterar</td> <td><a href="pesquisar_clientes.asp">Listar todos</td></tr>--> </table> </form> </div> </div></td> </tr> </table></td> </tr> </table>
-
Ué onde você define as SESSION .. olha esse script de Login com session <!--#include file="config/conexao.asp"--> <% call abre_conectar login=(Request.QueryString("login")) senha=(Request.QueryString("senha")) sql = "SELECT * FROM membros WHERE login='"&login&"' AND senha='"&senha&"' " set tab = cnn.execute(sql) ' Caso os dados não estiverem corretos o usuário é enviado para a entrar.htm if tab.eof then Response.Redirect"negado.asp" else Session("login")=login Session("nome")=nome Session("email")=email 'Session("usuario")= acesso("usuario") 'Session("Email")= acesso("Email") Session("login")= tab("login") Session("nome")= tab("nome") Session("email")= tab("email") 'você pode colocar quais sessions você quiser aqui que o restante do site vai ler. Session("login")=TRUE Response.Redirect"clientes.asp" end if call fecha_conectar set tab = nothing %>
-
Valeu mesmo detonou, mais uma vez ... Brigadãoooooo
-
cara você tem q mandar ele gravar depois q termina o SCRIPT de envio de email ... Dei uma adaptada no seu Script, copia e cola ai e vê se funciona ... Pois no meu eu uso eu faço assim ... envia_email.asp <!--#INCLUDE file="conexao.asp"--> <% Dim ObjSendMail 'Se for um envio do formulário in-company if request.QueryString("inc") <> "" then 'Listando o curso para aparecer no e-mail curCod = request.QueryString("inc") Call abre_conexao strCURSO = "select * from TABCUR where CURCOD = '"&curCod&"' " Set rsCURSO = Conexao.Execute(strCURSO) 'Montando a mensagem varDATA = day(now())&"/"&month(now())&"/"&Year(now()) varAREAATUACAO = "Treinamentos In Company" varSOLICITACAO = curCod empresa = Ucase(cstr(request.form("txt_empresa"))) contato = Ucase(cstr(request.form("txt_contato"))) cargo = Ucase(cstr(request.Form("txt_cargo"))) email = Lcase(cstr(request.form("txt_email"))) telefone = cstr(request.form("txt_telefone")) site = cstr(request.form("txt_site")) proposito = cstr(request.form("txt_proposito")) mudancas = cstr(request.form("txt_mudancas")) participantes = cstr(request.form("txt_participantes")) publico = cstr(request.form("txt_publico")) normas = cstr(request.form("txt_normas")) necessidades = cint(request.form("txt_necessidades")) atendente = cstr(request.form("txt_preenchido")) if necessidades = 1 then necessidades = "Solicitação da Chefia" elseif necessidades = 2 then necessidades = "Solicitação dos Participantes" elseif necessidades = 3 then necessidades = "Levantamento de necessidades por parte do RH" elseif necessidades = 4 then necessidades = "Carência identificada na avaliação por competencia" elseif necessidades = 5 then necessidades = "Carência identificada na avaliação por desempenho" elseif necessidades = 6 then necessidades = "Outros" end if texto = "<font face='Verdana' size = '2'>A/C Departamento de In Company,<p>Você esta recebendo um contato do site CR BASSO sobre o treinamento de "& rsCURSO("CURCOD") &" - "& rsCURSO("CURNOME") &" a ser realizado na seguinte empresa:<p><b>Empresa:</b> "&empresa&"<br><b>Contato:</b> "&contato&"<br><b>Cargo:</b> "&cargo&"<br><b>Telefone:</b> "&telefone&"<br><b>E-mail:</b> "&email&"<br><b>Site:</b> "&site&"<br><b>Atendente:</b> "&atendente&"<br></p><p><b>Propósito deste treinamento na empresa:</b> "&proposito&"</p><p><b>Expectativas das principais mudanças obtidas pós-treinamento:</b> "&mudancas&"</p><p><b>Número de participantes:</b> "&participantes&"</p><p><b>Público que irá participar do treinamento:</b> "&publico&"</p><p><b>Normas de Qualidade da empresa:</b> "&normas&"</p><p><b>A necessidade deste treinamento partiu de:</b> "&necessidades&"</p></font>" 'CDOSYS 'smtpserver = "mail.crbasso.com.br" 'youremail = "crbasso@crbasso.com.br" 'yourpassword = "crbfalcao24" smtpserver = "200.234.205.145" youremail = "crbasso@crbasso.com.br" yourpassword = "crbs1011" Set ObjSendMail = CreateObject("CDO.Message") ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpserver ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = youremail ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = yourpassword ObjSendMail.Configuration.Fields.Update ObjSendMail.To = "andreferreira@crbasso.com.br" ObjSendMail.Subject = "Solicitação de proposta In Company efetuada pelo site" ObjSendMail.From = "crbasso@crbasso.com.br" ObjSendMail.HTMLBody = texto ObjSendMail.Send Set ObjSendMail = Nothing Call fecha_conexao set rsCURSO = Nothing <!--#INCLUDE file="OS.asp"--> <% 'Incluindo no bando de dados Call abre_OS strINCLUIR = "insert into TABOS (AREAATUACAO, SOLICITACAO, DATA, EMPRESA, CONTATO, CARGO, TELEFONE, EMAIL, SITE, ATENDENTE, NUMPARTI) values ('"&varAREAATUACAO&"', '"&varSOLICITACAO&"', '"&varDATA&"', '"&empresa&"', '"&contato&"', '"&cargo&"', '"&telefone&"', '"&email&"', '"&site&"', '"&atendente&"', '"&aparticipantes&"')" set rsINCLUIR = cnn.Execute(strINCLUIR) Call fecha_OS Set cnn = Nothing 'Fim Incluindo no bando de dados %>
-
Bom dia tenho o script abaixo p/ envio de e-mail: <% if session("login") <> true then response.redirect "default.asp" end if %> <style type="text/css"> <!-- #apDiv1 { position:absolute; width:188px; height:324px; z-index:1; left: 23px; top: 57px; } --> </style> <table width="100%" height="480" border="0"> <tr> <td width="14%" valign="top"> </td> <td width="86%" height="32"> </td> </tr> <!-- Menu Topo --> <tr> <td valign="top"> </td> <td height="42"><div align="left"><a href="membros.asp">Membros</a> <a href="clientes.asp">Clientes</a> <a href="projetos.asp">Projetos</a> <a href="agenda.asp">Agenda</a></div></td> </tr> <!-- Links Esquerda --> <!--#include file="includes/links.asp"--> <!-- Corpo da página --> <tr> <td valign="top" nowrap scope="col"><div align="left"> <!-- #include file="config/conexao.asp"--> <% call abre_conectar sql = "Select * from membros" set tab = cnn.execute(sql) %> </div>Usuário: <%Response.write(Session("nome")) %> <a href="logout.asp">(Sair) </a> <div class=h3>Notificação de envio de e-email</div> <br> <% if session("login") <> true then response.redirect "default.asp" end if %> <% 'Resgata valor checkbox separados por vírgula. strP=request.form("box") titulo=request.form("titulo") obs=request.form("obs") ArrP=split( strP , "," ) 'No caso coloquei virgula, pois o separador é este, caso seja outro basta mudara para o desejado. 'Faz o loop para enviar até que dispare todos os selecionados. for i = 0 to UBound(ArrP) Set objmail = Server.CreateObject("CDONTS.NewMail") objMail.From = "email@yahoo.com.br" objMail.To = ArrP(i) objMail.Cc = "" objMail.Bcc = "" objMail.Subject = request.form("titulo") 'titulo da mensagem sHTML = sHTML & "<html xmlns=""http://www.w3.org/1999/xhtml"">" sHTML = sHTML & "<head>" sHTML = sHTML & "<title>Thatto Interativa</title>" sHTML = sHTML & "</head>" sHTML = sHTML & "<body leftmargin=""0"" topmargin=""0"" rightmargin=""0"" bottommargin=""0"" bgcolor=""#FCEFC3"">" 'sHTML = sHTML & request.form("data") 'data do compromisso 'sHTML = sHTML & request.form("hora") 'Hora do compromisso sHTML = sHTML & request.form("obs") 'corpo da mensagem sHTML = sHTML & "</body>" sHTML = sHTML & "</html>" objMail.MailFormat = 0 objMail.BodyFormat = 0 objMail.body = sHTML objMail.Send sHTML = "" On Error Resume Next set objMail = Nothing if Err <> 0 Then Response.Write "Foi encontrado um erro (" & Err.Description & ")." Response.End End if 'Fim loop. next 'Gera alerta de envio ao fim do código. response.Write("<font face='verdana' size='1'>E-mails enviado com sucesso!</font><br>") response.Write("<font face='verdana' size='1'>Para: "&strP&".</font>") %> <a href="agenda.asp">Voltar</a> <% 'call abre_conectar 'titulo=request.Form("titulo") 'data=request.Form("data") 'hora=request.Form("hora") 'obs=request.Form("obs") 'sql = "insert into agenda (titulo, data, hora, obs, convidar)" 'sql = sql & " values ('"&titulo&"', '"&data&"', '"&hora&"', '"&obs&"', '"&convidar&"')" 'set tab = cnn.execute(sql) 'call fecha_conectar 'set tab = nothing %> </div> </div></td> </tr> </table></td> </tr> </table> Acontece q em cada página eu tenho um SESSION q identifica o usuário ... ná página aparece a MENSAGEM "Bem Vindo Usuário <%Response.write(Session("nome")) %>" email: <%Response.write(Session("email")) %> Então no email onde está objMail.From = "email@yahoo.com.br" Gostaria q o email "email@yahoo.com.br" fosse o email do usuário logado como faço isso ???
-
Bom dia, preciso de um Script q a página aparece por um tempo e depois é direcionada para outra ... Ex: Tenho em envio de e-email em ASP, e gostaria de uma função em JavaScript para aparecer uma mensagem: E-MAIL ENVIADO para "endereço de email" E APÓS ALGUNS SEGUNDOS A PÁGINA SER DIRECIONADA PARA OUTRA ... Alguém tem esse script ou algum tutorial para me indicar ...
-
Então cara aparentemente está OK ... você usa o link assim <a href="maquinas_disponiveis.asp?tipo=a" target="conteudo">Máquinas Disponivéis</a> Tenta fazer assim sem o o tipo=a" <a href="maquinas_disponiveis.asp?tipo=a target="conteudo" ">Máquinas Disponivéis</a> você quer abrir o LINK em uma poup-up ?? olha como eu passo o meu link para abrir em uma poup-pop, uso um evento onClick em JavaScript. <a href="detalhe_noticia.asp?noticia=<%=tab("autonum")%>"onClick= "NewWindow(this.href,'name','200','300','yes');return false"><%=tab("titulo")%>|</a>
-
Boa tarde tenho um Script de envio de email q está OK, mas gostaria de exibir uma mensagem de confirmação de envio ... Essa mensagem aparece e depois de alguns segundos o usuário é direcionado para outra página, como faço isso ?
-
kkkkkkk também acho ... valeuuu
-
Ok cara fácil .. vamos lá Acho q você está com a seguinte idéia de fazer com q só mude o conteúdo do seu site, "o miolo" né ?? Então copia a sua página index.php copia ela e salva como pessoal.php, cria um include com o conteúdo do seu menu, a mesma idéia acima ... e na sua <div> é só você exibir o conteúdo da sua página pessoal.php ... você terá o seguinte resultado ... a sua página pessoal.php, será igual ao seu index, apenas com o miolo com a informação da página correspondente ao link ... Testa ai um exemplo simples pessoal.php <? php include (menu.php);?> // todos os links do meu menu /* conteúdo do meu site, aqui é onde vai aparecer todo o conteúdo da minha página*/ <? php include (rodapé.php);?> //conteúdo do meu rodapé Todas as páginas deverão ter a mesma estrutura
-
Ok entendi ... provavelmente é porque a variável q você usa no insert dessa página não é igual ao da sua conexão ... tipo essa linha set tab = cnn.execute(sql) funciona no meu insert pois SET e CNN são as minhas variáveis de conexão ... Qualquer Dúvida posta o seu INSERT com a sua variável de conexão ... Então depende onde eu estou usando conexão. Se eu não tiver conexão ainda na página eu tenho q criar uma conexão e mandar o meu INSERT ... Nesse caso POSTADO ele já usa conexão, então tenho q fazer um INSERT antes de fecha-lo, ou seja antes do Call fecha_conexao set rsCURSO = Nothing
-
Como faço para notificar o usuário por email ... Tipo eu já consigo enviar e-mail para o usuário, Mas assim qd tiver próximo de uma data estipulada no e-mail, aparecer uma mensagem no email do usuário notificando q está próximo do evento, e também uma mensagem na tela .. tipo um alerta do Windows
-
Opá depois do email manda ele gravar no banco se dados :: abaixo está o código q eu uso !!! sql = "insert into agenda (titulo, data, hora, obs, convidar)"'sql = sql & " values ('"&titulo&"', '"&data&"', '"&hora&"', '"&obs&"', '"&convidar&"')" set tab = cnn.execute(sql)