Como Acesso Aos Campos...

April 27, 2004

como me refiro aos meus inputs em um código ASP....

em JavaScript é.:

document.form.campo.value...

e em ASP???

bolomaster · April 27, 2004

não entendi.. você quer buscar o valor de um campo do formulario

é so request.form("nomedocampo")

espero que seja isso

April 27, 2004

Eu quero atribuir valores e não buscar....

você saberia me ajudar?!

bolomaster · April 27, 2004

Supondo que este valor venha do banco de dados

Ai seria mais ou menos assim

abraços e fui

bolomaster · April 27, 2004

So completando pode vir de uma variavel também..

Tipo você tem a variavel nome

nome = "rafael"

ai você pode chamar este valor no campo

ok espero que seja isso

April 27, 2004

Bom, não é bem isto,....é o seguinte....

Eu criei uma página para administração de notícias que entrariam em

meu site,...

Nesta página eu inseri os campos texto (Id, Titulo, selo, etc...) e quando

rodo o programa ele apresenta os dados já incluidos no banco (estes

são navegáveis, para frente e para trás), e botões como incluir, etc...

Nos campos texto eu atribui ao value='<%=varId%>' e assim por diante.

Nos botões de navegação, avançar e voltar, eu inseri a programação

rs.MoveNext.....para que os campos sejam atualizados seria necessário

eu criar uma função para que os values dos meu input`s sejam

reatualizados em cada click.....

Se você não entender, post ae....

Vlew,...não liga as dúvidas e a 'dificuldade em minha comunicação....

Victor...

bolomaster · April 27, 2004

Olha so se estas variaveis VARID que estao como values dos campos texto, por exemplo estiverem vindo dados do banco com o do while e o loop estara fazendo automatico, posta o seu script para ver o que você já fez ..

Abraços

April 27, 2004

Ae, vai....

<%Option Explicit%>

<html>

<head>

<title>Prefeitura Municipal de Jundiaí - Administração/Notícias</title>

Function atualizaForm()

varId = recNoticia.Fields("id")

varTitulo = recNoticia.Fields("titulo")

varSelo = recNoticia.Fields("selo")

varLocFoto = recNoticia.Fields("localFoto")

varLegFoto = recNoticia.Fields("legendaFoto")

varTxtNoticia = recNoticia.Fields("txtNoticia")

End Function

</script>

<%

Dim conNoticia

Dim recNoticia

Dim varId, varTitulo, varSelo, varLocFoto, varLegfoto, varTxtNoticia

Set conNoticia = Server.CreateObject("ADODB.Connection")

Set recNoticia = Server.CreateObject("ADODB.RecordSet")

conNoticia.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("noticias.mdb")

recNoticia.open "tblNoticias", conNoticia

%>

</head>

<tr>

<tr>

</div>

</td>

<%if recNoticia.EOF = True then%>

<%Else%>

<%End if%>

</div>

</td>

</div>

</td>

</td>

</td>

</tr>

</table>

</td>

</tr>

</table>

<tr>

<tr>

<input type="text" name="txtId" size="2" value="<%=varId%>" disabled="true" style="background-color: #F5F5F5; color: #666666; font-size: 10; font-family: Verdana; border: 1 solid #666666">

</div>

</td>

</tr>

</table>

<tr>

<td align="left" width="5%" height="15"><div style="margin-left: 5"><font size="1" color="#999999" face="Verdana"><strong>Título</strong></font></div></td>

</tr>

<tr>

<input type="text" name="txtTitulo" size="50" value="<%=varTitulo%>" disabled="true" style="background-color: #F5F5F5; color: #666666; font-size: 10; font-family: Verdana; border: 1 solid #666666">

</div>

</td>

<input type="text" name="txtSelo" size="50" value="<%=varSelo%>" disabled="true" style="background-color: #F5F5F5; color: #666666; font-size: 10; font-family: Verdana; border: 1 solid #666666">

</div>

</td>

</tr>

</table>

</td>

<tr>

</tr>

<tr>

<input type="button" value=">>" name="btAvancar" style="border: 1 solid #000000; background-color: #EFEFEF; color: #666666; width: 25; height: 20; font-size: 10; font-family: Verdana" onClick='<%=recNoticia.MoveNext & atualizaForm()%>'>

</div>

</td>

</tr>

<tr>

</td>

</tr>

</table>

</td>

</tr>

</table>

</body>

</html>

bolomaster · April 27, 2004

Tente ai não testei mas olha se vai funcionar

<%Option Explicit%>
<html>
<head>
<title>Prefeitura Municipal de Jundiaí - Administração/Notícias</title>
<%
Function atualizaForm()
varId = recNoticia.Fields("id")
varTitulo = recNoticia.Fields("titulo")
varSelo = recNoticia.Fields("selo")
varLocFoto = recNoticia.Fields("localFoto")
varLegFoto = recNoticia.Fields("legendaFoto")
varTxtNoticia = recNoticia.Fields("txtNoticia")
End Function
Dim conNoticia
Dim recNoticia
Dim varId, varTitulo, varSelo, varLocFoto, varLegfoto, varTxtNoticia
Set conNoticia = Server.CreateObject("ADODB.Connection")
Set recNoticia = Server.CreateObject("ADODB.RecordSet")
conNoticia.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("noticias.mdb")
recNoticia.open "tblNoticias", conNoticia
%>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad='<%atualizaForm()%>'>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#CCCCCC" height="40">
<tr>
<td height="37" style="border-bottom: 1 solid #000000" valign="middle">
<table width="100%" border="0" cellspacing="0" cellpadding="2" height="30">
<tr>
<td width="15%">
<div align="center">
<input type="button" value="Novo" name="btNovo" style="border: 1 solid #000000; background-color: #EFEFEF; color: #666666; width: 75; height: 20; font-size: 10; font-family: Verdana">
</div>
</td>
<td width="15%">
<div align="center">
<input type="button" value="Excluir" name="btExcluir" disabled="True" style="border: 1 solid #000000; background-color: #EFEFEF; color: #666666; width: 75; height: 20; font-size: 10; font-family: Verdana">
<input type="button" value="Excluir" name="btExcluir" style="border: 1 solid #000000; background-color: #EFEFEF; color: #666666; width: 75; height: 20; font-size: 10; font-family: Verdana">
</div>
</td>
<td width="15%">
<div align="center">
<input type="button" value="Alterar" name="btAlterar" style="border: 1 solid #000000; background-color: #EFEFEF; color: #666666; width: 75; height: 20; font-size: 10; font-family: Verdana">
</div>
</td>
<td width="15%">
<div align="center"></div>
</td>
<td width="40%">
<div align="center"></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF" height="40">
<tr>
<td align="left" width="90%">
<% do While not recNoticia.EOF %>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF" height="40">
<tr>
<td align="left" width="3%" height="15"><div style="margin-left: 5"><font size="1" color="#999999" face="Verdana"><strong>ID</strong></font></div></td>
<td align="left" width="97%" height="15">
<div style="margin-left: 5">
<input type="text" name="txtId" size="2" value="<%=varId%>" disabled="true" style="background-color: #F5F5F5; color: #666666; font-size: 10; font-family: Verdana; border: 1 solid #666666">
</div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF" height="40">
<tr>
<td align="left" width="5%" height="15"><div style="margin-left: 5"><font size="1" color="#999999" face="Verdana"><strong>Título</strong></font></div></td>
<td align="left" width="35%" height="15"></td>
<td align="left" width="5%" height="15"><div style="margin-left: 5"><font size="1" color="#999999" face="Verdana"><strong>Selo</strong></font></div></td>
<td align="left" width="55%" height="15"></td>
</tr>
<tr>
<td align="left" width="5%" height="15" colspan="2">
<div style="margin-left: 5">
<input type="text" name="txtTitulo" size="50" value="<%=varTitulo%>" disabled="true" style="background-color: #F5F5F5; color: #666666; font-size: 10; font-family: Verdana; border: 1 solid #666666">
</div>
</td>
<td align="left" width="5%" height="15" colspan="2">
<div style="margin-left: 5">
<input type="text" name="txtSelo" size="50" value="<%=varSelo%>" disabled="true" style="background-color: #F5F5F5; color: #666666; font-size: 10; font-family: Verdana; border: 1 solid #666666">
</div>
</td>
</tr>
</table>
<%
recNotica.MoveNext
Loop
%>
</td>
<td align="left" width="10%" valign="Top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF" height="40">
<tr>
<td align="left" width="100%" height="15"></td>
</tr>
<tr>
<td align="left" width="100%" height="15">
<div align="center">
<input type="button" value=">>" name="btAvancar" style="border: 1 solid #000000; background-color: #EFEFEF; color: #666666; width: 25; height: 20; font-size: 10; font-family: Verdana" onClick='<%=recNoticia.MoveNext & atualizaForm()%>'>
</div>
</td>
</tr>
<tr>
<td align="left" width="100%" height="15">
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
recNoticias.close
conNoticia.close
%>
</body>

Edited April 27, 2004 by bolomaster

Victor · April 28, 2004

Bom, não é bem isto,....é o seguinte....
Eu criei uma página para administração de notícias que entrariam em
meu site,...
Nesta página eu inseri os campos texto (Id, Titulo, selo, etc...) e quando
rodo o programa ele apresenta os dados já incluidos no banco (estes
são navegáveis, para frente e para trás), e botões como incluir, etc...
Nos campos texto eu atribui ao value='<%=varId%>' e assim por diante.
Nos botões de navegação, avançar e voltar, eu inseri a programação
rs.MoveNext.....para que os campos sejam atualizados seria necessário
eu criar uma função para que os values dos meu input`s sejam
reatualizados em cada click.....
Se você não entender, post ae....
Vlew,...não liga as dúvidas e a 'dificuldade em minha comunicação....
Victor...

Deixa eu ver se entendi, você quer que salve alguma coisa no banco de dados que o usuario escrever no campo de texto...Isso??

[]'s

Victor

April 28, 2004

Vou testar aki bolomaster....

Não Victor,...eu quero que quando eu click nos meu botão avançar, os campos

de meu formulário se preencham com os outros dados,...e assim consecutivamente....

Vlew pela ajuda galera...

Sign In

Como Acesso Aos Campos...

Question

Guest - tito -

Link to comment

Share on other sites

10 answers to this question

Recommended Posts

Link to comment

Share on other sites

Guest - tito -

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest - tito -

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest - tito -

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest - tito -

Link to comment

Share on other sites

Join the conversation

Forum Statistics