Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Userasp

paginação

Por , em ASP Clássico

Recommended Posts

Userasp    0

Userasp
Postado

Oi pessoal tudo bem

 

Gostaria de tirar minha duvida se é possível ou não fazer isso no ASP Classico...

 

Seguinte, gostaria de fazer minha paginação de acordo com o campo de pesquisa, pois na hora de clicar na paginação o campo de pesquisa se apaga no postback ... e por isso a paginação fica enorme desfaz a pesquisa com aquele dado informado ....

 

Como posso resolver isso porque também programo no .net e isso não acontece ....

 

Eis o código da pagina ASP:

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim sqlCustomers,rsCustomers

Dim con, rst, oConnection, cmd, conexaoDataBase,temp,temp2

Set conexaoDataBase= Server.CreateObject("ADODB.Connection")
conexaoDataBase.Open "Provider=SQLNCLI10; Data Source=10.1.1.3; Initial Catalog=Northwind; User ID=sa; Password=root"
Set rsCustomers = Server.CreateObject("ADODB.RecordSet")
rsCustomers.Pagesize = 3

if (request.form("txtContactName") <> "") then
valorString = Request.Form("txtContactName")
end if

rsCustomers.open "SELECT * FROM CUSTOMERS  WHERE ContactName LIKE '%" +valorString+"%' order by ContactName asc", conexaoDataBase,1,3


%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http:// www.w3.org/1999/xhtml">
<head>
<link rel="stylesheet" type="text/css" href="yui-datatable.css"/>
<link rel="stylesheet" type="text/css" href="tablecloth.css"/>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>

</head>
<body>
<br />
<br />
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0" 
       style="width: 635px; height: 379px;">
       <tr>
           <td width="637" class="style3">
<form method="post">
<table border="0" cellspacing="0" cellpadding="0" style="width: 673px">
 <tr>
   <td width="352"><input name="txtContactName" id="txtContactName"  type="text" size="70" maxlength="90" autocomplete="off" /></td>
   <td width="352"><input name="buton" type="submit" value="Pesquisar"></td>
 </tr>
</table>
</form>
<br />
<br />
<table align=center border="0" >
<tr>
	<%for j = 1 to rsCustomers.PageCount %>
		<td width=5><a href="Simple.asp?pag=<%= j %>"><%= j %></a></td>		
	<%next%>
</tr>
</table>
<TABLE class="yui-datatable-theme" cellspacing="0" cellpadding="0">
<TH>CustomerID</TH>
<TH>CompanyName</TH>
<TH>ContactName</TH>
<TH>ContactTitle</TH>
<TH>Address</TH>
<TH>City</TH>
<TH>Region</TH>
<TH>PostalCode</TH>
<TH>Country</TH>
<TH>Phone</TH>
<TH>Fax</TH>
<TH>Editar</TH>
<TH>Excluir</TH>
<%
if not rsCustomers.EOF then
	cor = "#eeeeee"
	i = 0

	if Request.QueryString("pag") = "" then
		rsCustomers.AbsolutePage = 1
	else
		rsCustomers.AbsolutePage = CInt(Request.QueryString("pag"))
	end if

	while (i < rsCustomers.PageSize) and not (rsCustomers.EOF)
		i = i + 1
		if cor = "#eeeeee" then
			cor = "#ffffff"
		else
			cor = "#eeeeee"
		end if
%>
<TR>
<TD> <%= rsCustomers("CustomerID") %> </TD>
<TD><%= rsCustomers("CompanyName") %> </TD>
<TD><%= rsCustomers("ContactName") %> </TD>
<TD><%= rsCustomers("ContactTitle") %> </TD>
<TD><%= rsCustomers("Address") %> </TD>
<TD><%= rsCustomers("City") %></TD>
<TD><%= rsCustomers("Region") %></TD>
<TD><%= rsCustomers("PostalCode") %></TD>
<TD><%= rsCustomers("Country") %></TD>
<TD><%= rsCustomers("Phone") %> </TD>
<TD><%= rsCustomers("Fax") %> </TD>
<td align=center><a href="SimpleEdit.asp?CustomerID=<%=rsCustomers("CustomerID")%>"><img src="/imagens/Edt.gif" border="0"></a></td>
<td align=center><a href="Contato_Exclui.asp?cod=<%= rsCustomers("CustomerID") %>"><img src="/imagens/del.gif" border="0"></a></td>	
</TR>
<% rsCustomers.MoveNext
wend
else 
%>
<tr>
	<td colspan="13" align="center" bgcolor="#FFCC99">Não há registros cadastrados</td>

</tr>
<%	
end if	
%>
</table>
</body>
</html>

 

Se poderem me ajudar tenho a certeza que é duvidas de muitos que estam comesando no ASP Classico...

 

Com todo respeito a comunidade.

Aguardo retorno

Compartilhar este post

Link para o post
Compartilhar em outros sites

Public2004    79

Public2004
Postado

Bom dia amigo e seja bem vindo ao fórum.

 

O parâmetro de pesquisa deve ser mantido na paginação.

Na primeira página de resultados o valor é recuperado do "form", mas nas demais esse valor do "form" já não existe, pois a chamada passa a ser via "querystring".

Uma sugestão é incluir o parâmetro no link da paginação e recuperá-lo nas demais páginas através de querystring.

 

Att.

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

você pode usar um GridView mais gerenciado em ASP.Net, terá mais opções, fiz alguns artigos usando Gridview, vai te ajudar

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito