Preciso que a partir da empresa selecionada no formulário abaixo, seja inserido automaticamente o final do email do usuário no campo texto "fim_mail". Para não correr o risco do usuário digitar um e-mail que não seja o da empresa.
Alguém saberia me dizer por que o código está dando erro????
O meu BD tem a tabela cad_empresa, com os campos (codigo, empresa, mail)
Código:
<!--#include file="TiraCache.asp"-->
<!--#include file="AbreConexao.asp"-->
<html>
<head>
<title>GIC - Gestão Integrada de Competências</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<script>
function validar(f)
{
if(f.empresa.value == "")
{
f.empresa.focus();
alert("Selecione sua empresa");
return false;
}
if(f.nome.value == "")
{
f.nome.focus();
alert("Digite seu nome completo");
return false;
}
if(f.email.value == "")
{
f.nick_mail.focus();
alert("Informe o nick do seu e-mail corretamente");
return false;
}
if(f.area_atuacao.value == "")
{
f.area_atuacao.focus();
alert("Informe sua Área de Atuação dentro da empresa");
return false;
}
if(f.cargo_ocupado.value == "")
{
f.cargo_ocupado.focus();
alert("Informe o Cargo que ocupa no momento");
return false;
}
return true;
}
</script>
<%
'esse objeto executa os SELECTs no BD e comandos SQL q devem retornar alguma coisa do BD
set lista = server.createObject("ADODB.recordset")
'Com esse parametro posso saber qnts registros tenho e mover dentro do resulta do select
lista.CursorLocation = 3
%>
<body>
<p align="center"><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Usuário</strong></font></p>
<form name="form1" method="post" action="grava_cadastro_funcionario_avaliacao.asp" onsubmit="return validar(this)">
<blockquote>
<p><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Atenção
usuário!<br>
Só serão aceitos cadastros com e-mail profissional (email
da empresa). Preencha corretamente o campo e-mail, pois você estará
recebendo uma mensagem com um link onde você estará cadastrando
sua senha para poder acessar as áreas de acesso restrito do GIC.</font></p>
</blockquote>
<table width="623" border="0" align="center" cellpadding="0" cellspacing="3">
<tr>
<td width="154"><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Selecione
sua Empresa</font></td>
<td width="460"><select name="empresa" onchange="this.form.action='cadastro_funcionario_avaliacao.asp'; this.form.submit()">
<%
'abro um recordset com as areas para a empresa logada e/ou selecionada
lista.Open "select empresa from cad_empresa", con
%>
<option value="0">Selecione</option>
<%
'loop para exibir as areas dentro de um combobox
Do While Not lista.Eof
%>
<option value="<%= lista("empresa")%>" <%if lista("empresa") = empresa then Response.Write " selected "%>><%= lista("empresa")%></option>
<%
lista.MoveNext
Loop
'fecho o recordset com as areas
lista.Close
%>
</select> <font color="#996600" size="1">*</font> </td>
</tr>
<tr>
<td height="24"><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Nome</font></td>
<td><input name="nome" type="text" id="nome" size="50" maxlength="50"> <font color="#996600" size="1">*</font>
</td>
</tr>
<tr>
<td><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">E-mail</font></td>
<td><input name="nick_mail" type="text" id="nick_mail" size="25" maxlength="40">
<%
'abro um recordset com o mail relacionado com a empresa
lista.Open "select mail from cad_empresa where empresa = '" & empresa & "'", con
%>
<input type="text" name="fim_mail" value="<%=lista("mail")%>" disabled>
<%
'fecho o recordset do mail
lista.Close
%>
<font color="#996600" size="1">*</font></td>
</tr>
<tr>
<td><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Área
de Atuação</font></td>
<td><input name="area_atuacao" type="text" id="area_atuacao" size="50" maxlength="50">
<font color="#996600" size="1">*</font> </td>
</tr>
<tr>
<td><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Cargo
Ocupado</font></td>
<td><input name="cargo_ocupado" type="text" id="cargo_ocupado" size="50" maxlength="50">
<font color="#996600" size="1">*</font> </td>
</tr>
<tr>
<td height="43" colspan="2"> <div align="center">
<p>
<input type="submit" name="Submit" value="Enviar">
</p>
<p><font color="#996600" size="1">*</font> <font color="#996600" size="2" face="Verdana, Arial, Helvetica, sans-serif">campos
obrigatórios</font></p>
</div></td>
</tr>
</table>
</form>
</body>
</html>
Pergunta
Guest - carine -
Bom dia!!!
Não estou conseguindo solucionar um problema:
Preciso que a partir da empresa selecionada no formulário abaixo, seja inserido automaticamente o final do email do usuário no campo texto "fim_mail". Para não correr o risco do usuário digitar um e-mail que não seja o da empresa.
Alguém saberia me dizer por que o código está dando erro????
O meu BD tem a tabela cad_empresa, com os campos (codigo, empresa, mail)
Código:
<!--#include file="TiraCache.asp"--> <!--#include file="AbreConexao.asp"--> <html> <head> <title>GIC - Gestão Integrada de Competências</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <script> function validar(f) { if(f.empresa.value == "") { f.empresa.focus(); alert("Selecione sua empresa"); return false; } if(f.nome.value == "") { f.nome.focus(); alert("Digite seu nome completo"); return false; } if(f.email.value == "") { f.nick_mail.focus(); alert("Informe o nick do seu e-mail corretamente"); return false; } if(f.area_atuacao.value == "") { f.area_atuacao.focus(); alert("Informe sua Área de Atuação dentro da empresa"); return false; } if(f.cargo_ocupado.value == "") { f.cargo_ocupado.focus(); alert("Informe o Cargo que ocupa no momento"); return false; } return true; } </script> <% 'esse objeto executa os SELECTs no BD e comandos SQL q devem retornar alguma coisa do BD set lista = server.createObject("ADODB.recordset") 'Com esse parametro posso saber qnts registros tenho e mover dentro do resulta do select lista.CursorLocation = 3 %> <body> <p align="center"><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Usuário</strong></font></p> <form name="form1" method="post" action="grava_cadastro_funcionario_avaliacao.asp" onsubmit="return validar(this)"> <blockquote> <p><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Atenção usuário!<br> Só serão aceitos cadastros com e-mail profissional (email da empresa). Preencha corretamente o campo e-mail, pois você estará recebendo uma mensagem com um link onde você estará cadastrando sua senha para poder acessar as áreas de acesso restrito do GIC.</font></p> </blockquote> <table width="623" border="0" align="center" cellpadding="0" cellspacing="3"> <tr> <td width="154"><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Selecione sua Empresa</font></td> <td width="460"><select name="empresa" onchange="this.form.action='cadastro_funcionario_avaliacao.asp'; this.form.submit()"> <% 'abro um recordset com as areas para a empresa logada e/ou selecionada lista.Open "select empresa from cad_empresa", con %> <option value="0">Selecione</option> <% 'loop para exibir as areas dentro de um combobox Do While Not lista.Eof %> <option value="<%= lista("empresa")%>" <%if lista("empresa") = empresa then Response.Write " selected "%>><%= lista("empresa")%></option> <% lista.MoveNext Loop 'fecho o recordset com as areas lista.Close %> </select> <font color="#996600" size="1">*</font> </td> </tr> <tr> <td height="24"><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Nome</font></td> <td><input name="nome" type="text" id="nome" size="50" maxlength="50"> <font color="#996600" size="1">*</font> </td> </tr> <tr> <td><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">E-mail</font></td> <td><input name="nick_mail" type="text" id="nick_mail" size="25" maxlength="40"> <% 'abro um recordset com o mail relacionado com a empresa lista.Open "select mail from cad_empresa where empresa = '" & empresa & "'", con %> <input type="text" name="fim_mail" value="<%=lista("mail")%>" disabled> <% 'fecho o recordset do mail lista.Close %> <font color="#996600" size="1">*</font></td> </tr> <tr> <td><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Área de Atuação</font></td> <td><input name="area_atuacao" type="text" id="area_atuacao" size="50" maxlength="50"> <font color="#996600" size="1">*</font> </td> </tr> <tr> <td><font color="#006699" size="2" face="Verdana, Arial, Helvetica, sans-serif">Cargo Ocupado</font></td> <td><input name="cargo_ocupado" type="text" id="cargo_ocupado" size="50" maxlength="50"> <font color="#996600" size="1">*</font> </td> </tr> <tr> <td height="43" colspan="2"> <div align="center"> <p> <input type="submit" name="Submit" value="Enviar"> </p> <p><font color="#996600" size="1">*</font> <font color="#996600" size="2" face="Verdana, Arial, Helvetica, sans-serif">campos obrigatórios</font></p> </div></td> </tr> </table> </form> </body> </html>
Editado por cyberalexxxLink para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
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.