- Fórum WMO
- → Reluviari's Content
Reluviari's Content
There have been 78 items by Reluviari (Search limited from 26/04/2023)
#211018 Valor De Checked Box Ou Radio
Posted by Reluviari on 17/10/2003, 17:38 in ASP
gostaria de saber como eu faço para recuperar o valor de um RadioButton ou checkbox quando eles esão checados
pois queria por exmplo que quando o chekbox estivesse chekado (por exmplo)
if "& request.Form("nome do checkbox")&" = checked then response.Write("Sim") else response.Write("Não") end if
mais ou menos isso...pois dessa forma não deu certo e tentei varias maneiras mais eu acho a sintaxe certa ...
obrigado pela atenção galeraaa
#210258 Último Registro
Posted by Reluviari on 16/10/2003, 15:36 in ASP
Pessoal gostaria de saber com faço para dar um select apenas no ultimo registro de minha tabela
set query= conn.execute("select * from Minha_Tabela ")
Depois declaro assim...
<td>
<%=query("Nome_do Campo")%>
</td>
Só que ele me traz apenas o 1ºregistro cadastrado , quando na veradade tenho que mostrar apenas o último registro a ser cadastrado
alguém pode me dar uma força??
desde de já agradeçooo
#197977 Função Scroll?
Posted by Reluviari on 29/09/2003, 13:21 in Javascript / DOM / AJAX / ECMAScript
<script language=JavaScript>
<!--
var position = 0;
function scroller() {
if (position != 320) {
position++;
scroll(0,position);
clearTimeout(timer);
var timer = setTimeout("scroller()",3); timer;
}
else
{
location.replace("#");
}
}
//-->
</SCRIPT>
#195990 Ao Passar O Mouse, Aparecer Texto Do Lado
Posted by Reluviari on 26/09/2003, 16:54 in HTML, CSS e Metodologias
qualquer coisa é só falar lzzz
#195982 Função Scroll?
Posted by Reluviari on 26/09/2003, 16:31 in Javascript / DOM / AJAX / ECMAScript
galera gostaria de saber se existe alguma função (já ouvir falar) para que quando criar rolagem essa rolagem se desloque automaticamente.
Pois tenho varios registros listados e e existe uma função Hint , porém qdo chega ao ultimo registro o hint que aparece com um texto nao da pra le , por isso preciso que a rolagem se desloque automaticamente qdo criada
obrigado galera até mais.................
#190098 Botao Anterior
Posted by Reluviari on 18/09/2003, 10:42 in ASP
Eis aki o código completo(caso alguém tenha dúvida também)
<%
id=request.QueryString("cliente")
RS = ""
Set RS = Server.CreateObject("adodb.recordset")
RS.PageSize = 1
SQL = "select * From Clientesfone where cliente = '"& id &"' "
RS.Open SQL,Conn,3,3
IF RS.EOF then
Response.Write "nenhum registro encontrado"
Response.End 'paramos o programa
ELSE
'Definindo em qual pagina o visitante está
IF Request.QueryString("pagina")="" then
intpagina=1
ELSE
IF cint(Request.QueryString("pagina"))<1 then
intpagina=1
ELSE
IF cint(Request.QueryString("pagina"))> RS.PageCount then
intpagina=RS.PageCount
ELSE
intpagina=Request.QueryString("pagina")
END IF
END IF
END IF
END IF
RS.AbsolutePage=intpagina
intrec=0
While intrec < RS.PageSize and not RS.EOF
set RS2 = conn.execute("select * From Tipostelefone where Tipotelefone = ' "& RS("Tipotelefone") &" '")
%>
<LINK href="css/style.css" type=text/css rel=stylesheet>
<div id="Layer1" style="position:absolute; left:150px; top:114px; height:px; z-index:5">
<table width="98%">
<tr>
<td>
<a href="dadosgerais.asp?cliente=<%=request.QueryString("cliente")%>" class="Links"><img src="imagens/aba_dados.gif" border="0"></a>
<a href="enderecos.asp?cliente=<%=request.QueryString("cliente")%>" class="Links"><img src="imagens/aba_enderecos.gif" border="0"></a>
</td>
<td width="17%" align="right">
<a href="java script:history.go(-1)"><img src="imagens/aba_voltar.gif" border="0"></a>
</td>
</tr>
</table>
<table width="98%">
<tr>
<td align="center" bgcolor="#336699" height="16"><font color="#EFFF00" size="2" face="Verdana"><b>Telefones</b></font></td>
</tr>
</table>
<table width="98%">
<tr class="label">
<td>Tipo de Telefone</td>
</tr>
<tr class="dados">
<%do while not RS2.eof%>
<td>
<%response.write RS2("descricao")%>
</td>
</tr>
<%RS2.movenext
loop%>
</table>
<table width="98%">
<tr class="label">
<td>Ddd</td>
<td>Telefone</td>
<td>Ramal</td>
</tr>
<tr class="dados">
<td><%response.write RS("ddd")%></td>
<td><%response.write RS("telefone")%></td>
<td><%response.write RS("ramal")%></td>
</tr>
</table>
<table width="98%">
<tr class="label">
<td>Contato</td>
</tr>
<tr class="dados">
<td><%response.write RS("contato")%></td>
</tr>
<tr>
<td align="center">
</table>
</div>
</body>
<%
RS.MoveNext
' Acrescenta +1 ao contador
intrec=intrec+1
'Se for EOF (fim de arquivo), imprimir branco na tela
IF RS.EOF then
response.write " "
END IF
Wend 'fim do loop
'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”.
IF intpagina > 1 then
%>
<div id="Layer1" style="position:absolute; left:45%; top:280px; height:px; z-index:5">
<a class="linkmenuglobal" href="fones.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina-1%>"><< Anterior</a>
</div>
<%
END IF
'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página
IF strcomp(intpagina,RS.PageCount) <> 0 then
%>
<div id="Layer1" style="position:absolute; left:55%; top:280px; height:px; z-index:5">
<a class="linkmenuglobal" href="fones.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina + 1%>">Próxima >></a>
</div>
<%
END IF
%>
#190024 Botao Anterior
Posted by Reluviari on 18/09/2003, 09:17 in ASP
como vc me disse o codigo é esse mais quero aprender como se faz também blzzz
obrigadom pela ajuda caras...
<%
id=request.QueryString("cliente")
RS = ""
Set RS = Server.CreateObject("adodb.recordset")
RS.PageSize = 1
SQL = "select * From Clientesender where cliente = '"& id &"' "
RS.Open SQL,Conn,3,3
IF RS.EOF then
Response.Write "nenhum registro encontrado"
Response.End 'paramos o programa
ELSE
'Definindo em qual pagina o visitante está
IF Request.QueryString("pagina")="" then
intpagina=1
ELSE
IF cint(Request.QueryString("pagina"))<1 then
intpagina=1
ELSE
IF cint(Request.QueryString("pagina"))> RS.PageCount then
intpagina=RS.PageCount
ELSE
intpagina=Request.QueryString("pagina")
END IF
END IF
END IF
END IF
RS.AbsolutePage=intpagina
intrec=0
While intrec < RS.PageSize and not RS.EOF
set RS2 = conn.execute("select * From TiposEndereco where TipoEndereco = ' "& RS("TipoEndereco") &" '")
%>
<body>
<div id="Layer1" style="position:absolute; left:150px; top:114px; height:px; z-index:5">
AQUI FICAM AS TABELAS ONDE MOSTRO OS DADOS
</DIV>
</BODY>
.................................AQUIE ESTAO OS BOTOES..........................
<a class="link" href="enderecos.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina-1%>">Anterior</a> -
<a class="link" href="enderecos.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina + 1%>">Próxima</a>
<%
RS.MoveNext
' Acrescenta +1 ao contador
intrec=intrec+1
'Se for EOF (fim de arquivo), imprimir branco na tela
IF RS.EOF then
response.write " "
END IF
Wend 'fim do loop
'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”.
IF intpagina > 1 then
%>
<%
END IF
'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página
IF strcomp(intpagina,RS.PageCount) <> 0 then
%>
<%
END IF
%>
#189607 Instrução Sql
Posted by Reluviari on 17/09/2003, 15:13 in ASP
set rsquery3 = conn.execute("select * from coberturas where cobertura = '"& rsquery("cobertura") &"' ")
existem 30 coberturas
existem muitas coberturas mais tem duas que eu não posso mostrar a número 22 e 25
obrigado gente
#189606 Iframe
Posted by Reluviari on 17/09/2003, 15:12 in Dreamweaver
please obrigado
#189436 Iframe
Posted by Reluviari on 17/09/2003, 11:41 in Dreamweaver
eu tenho um site com tres frames
-topo
-corpo
-menu_esquerdo
eu quero saber como eu faço para que o conteudo apareça no corpo quando eu clicar tanto nos botoes que encontran-se no topo e tanto os botoes que aparecem no meu esquerdo alguém pode me ajudra?????
#187925 Listar Registro Com Linha De Cor Diferente
Posted by Reluviari on 15/09/2003, 09:24 in ASP
pessaol eu tenho que listar uma tabela o BD mais ela contem com muiro campos em um só registro, e eu tenho que listar centenas de registro na tela ...gostaria d saber como deixar uma linha de cada cor , para não confundir os dados de um registro com o outro sem puderem me ajudar eu agradeço
Obrigado pela atenção galera @!!!!!!
Abraço!!!!!!!!!
#185805 Dividir Registros Em Colunas
Posted by Reluviari on 12/09/2003, 13:37 in ASP
caras eu tenho uma tabela que é preenchida com um loop movenext.
só que existem muitos registros e tenho que dividir em 3 colunas
tentei mais nada do que eu fiz deu certo ..... em 1ºlugar..tem como fazer isso??
valeu galera!!!!!!!!! o codigo é esse a seguir:
<table width="98%">
<tr class="label">
<td>Coberturas</td>
</tr>
<tr>
<%do while not rsquery.eof%>
<%set rsquery3 = conn.execute("select * from coberturas where cobertura = '"& rsquery("cobertura") &"'")%>
<td><a class="linkmenuglobal" href="Do_Coberturas.asp?cobertura=<%=rsquery("cobertura")%>&cliente=<%=request.QueryString("cliente")%>&documento=<%=request.QueryString("documento")%>&seqendosso=<%=request.QueryString("seqendosso")%>" onmouseover="<%buscar(rsquery("cobertura"))%>" onmouseout="kill()" ><%=rsquery3("descricao")%></a></font></td>
</tr>
<%rsquery.movenext
loop%>
</table>
#171636 Dúvida Em Passar Parametro
Posted by Reluviari on 19/08/2003, 14:11 in ASP
tenho q passar um parametro para uma detreminada paguna logo apos o usuário ter feito o login tenhoo isso aki......
cpf=request.form("campo_cpf")
set rsquery=conn.execute("select * nome,tel,cpf from Clientes where Cpf = '" & cpf &"' ")
if rsquery.EOF then
Response.Redirect ("login.asp?erro=1")
else
Response.Redirect ("menu.asp")
end if
só q tenho q passar um prametro para essa pagina chamada menu.asp(campo "nome")
tentei fazer dessa maneira "Response.Redirect("menu.asp?nome=rsquery("nome")...mas nao deu certo...
alguem pode dar-me uma força
obrigado gente
#166808 Exceção?
Posted by Reluviari on 11/08/2003, 14:17 in ASP
Tipo de erro:
(0x80020009)
Exceção.
/fullseg/lista_clientes.asp, line 47
a linha 47 é essaaaaaaaa.................................
<% do while not rsquery.eof %>
<%
set rsquery2 = conn.execute("Select * from documentos where documento = '"& rsquery("documento") &"' ")
%>
<%
linha 47 set rsquery3 = conn.execute ("Select * from clientes where cliente = '"& rsquery2("cliente") & "' ")
%>
<%rsquery.movenext
loop%>
valeu galeraaa!!!!!!!!!!!!!!!!
#153250 Response.redirect Com Dois Parametros
Posted by Reluviari on 24/07/2003, 16:06 in ASP
id=request.querystring("exemplo")
id2=request.querystring("exemplo2")
Response.Redirect("pagina.asp?1ºparametro=" + id)
mas na verdade eu tenho q passar dois parametros ...
tentei de varias maneiras mais da pau na pagina alguem poderia me dizer como faço isso
passar dois parametros em um redirect
#153120 Erro No Postgre
Posted by Reluviari on 24/07/2003, 13:15 in PostgreSQL
Key violation
Erro While Executing the Query
ERROR: cannot extend Documentos:Permission denied
Check free disk space
será q alguem sabe pq??
eu penssei e fosse por causa q o hd esta lotado mais tem muito espaço ainda...
me ajudemmmm meu sistema esta parado
obrigado!!!!!!!!!
#152463 Inserir Com Condição
Posted by Reluviari on 23/07/2003, 16:28 in ASP
o usuario entra na pagina de login entao ele informa um dado dele q ja existe no banco (no caso produtor)
entao ele tem q cadastrar um login e uma senha
entao eu tenho q inserir esse login e essa senha de acordo com rg do fulano ...mas nao sei como é essa codigo para incluir com uma condição...tentei fazer desse jeito mas deu erro se sintaxe..
Response.Expires = 0
Dim Conn, objRs, strQuery, strConnection,produtor,login,senha
produtor = request.form("produtor")
login = Request.Form("login")
senha = Request.Form("senha")
strQuery = "INSERT INTO produtores (login,senha) VALUES ('"&login&"', '"&senha&"') where produtor = '"& produtor &"'"
Set ObjRs = Conn.Execute(strQuery)
alguem pode me ajudar por gentileza
obrigado
#152460 Carregar Variavel?
Posted by Reluviari on 23/07/2003, 16:27 in Adobe Flash e ActionScript
vou posta- lo aki ou melhor posso falar contigo amanha pela manha no msn?????
nao quero q faça para mim e sim q me explique
por favor
obrigado cara
#152206 Carregar Variavel?
Posted by Reluviari on 23/07/2003, 11:58 in Adobe Flash e ActionScript
- Fórum WMO
- → Reluviari's Content
- Privacy Policy
- Regras ·