Ir para conteúdo

Arquivado

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

Superwagtel

Mostrando o 1º registro e o último registro

Recommended Posts

Como faço para apresentar no palco apenas a primeira a última variável de um

recordset?

 

Na página criei o recerdset que filtra as variáveis da URL e fiz ele mostrar no palco da seguinte forma:

 

De <%= (Recordset.Fields.Item("Tabela").Value) %> a <%= (Recordset.Fields.Item("Tabela").Value) %>

 

Preciso fazer com que ele apresente assim:

 

De <%= (primeiro item) %> a <% (ultimo item) %>

 

Onde mudo código para conseguir isto?

 

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

Se vc tiver pegando o Campo sendo "AutoNumeração", pode ser feito de forma simples.

 

Pega o Primeiro Registro:

SELECT top 1 valor FROM Tabela order by id ASC 

Pega o Ultimo Registro:

SELECT top 1 valor FROM Tabela order by id DESC 

Compartilhar este post


Link para o post
Compartilhar em outros sites

vc pode antes recuperar o ultimo registro incluido, vc pode usar o SQL Last()
A função Last() retorna o último valor da coluna selecionada.

SELECT LAST(column_name) FROM table_name

existem alguns tópicos sobre este assunto no forum, da´uma pesquisada...

no SQL SERVER, você pode recuperar essa valor com

SELECT @@IDENTITY

no MySQL vc pode usar o LAST_INSERT_ID()

========

ultimo registro e somar + 1 e inserir no bd
<%@ Language=VBScript %>
<% Option Explicit %>
<%
'conexao teste com mdb
Dim localbd, bd

Set bd = Server.CreateObject("ADODB.Connection")
localbd = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.MapPath("banco.mdb")
bd.Open localbd

Dim sql, rs
Dim cd_pedido

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

if Request.Form("btenvia") = "Gerar Numero" then
'Novo numero
SQL = "SELECT MAX(N_PEDIDO)+1 AS ULITMO_PEDIDO FROM PEDIDO"
Set rs = bd.Execute (sql)
cd_pedido = rs.Fields("ULITMO_PEDIDO").Value

'inserindo novo numero
bd.Execute ("INSERT INTO PEDIDO (N_PEDIDO) VALUES (" & cd_pedido & ")")
rs.Close

end if

'verificando numero
SQL = "SELECT MAX(N_PEDIDO) AS ULITMO_PEDIDO FROM PEDIDO"
Set rs = bd.Execute (sql)
cd_pedido = rs.Fields("ULITMO_PEDIDO").Value


rs.Close
Set rs = Nothing

bd.Close
Set bd = Nothing
%>
<html>
<head>
<title>Numero Sequencial</title>
</head>
<body>
<center>
<form id="frm" action="Numero_Sequencial.asp" method="post">
Numero do ultimo pedio:<%=cd_pedido%><br>
<input type="submit" id="btenvia" name="btenvia" value="Gerar Numero" />
</form>
</center>
</body>
</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

E esse tópico vc já consegui resolver ???

 

Ou ainda está com dúvidas?

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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