Visualizza primo record e se non c'è?

[AltF4]

Salve ragazzi, sapreste dirmi come selezionare il primo record in un db, ma che non dia errore se questo primo record non c'è?

Ho fatto così:

		  <%	
				Set RecSet = Server.CreateObject("ADODB.Recordset")
				Visa = "SELECT TOP 1 * FROM profili ORDER BY ID DESC"
				RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>

e mi da questo errore:

ADODB.Field error '80020009' 

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record. 

/profili.asp, line 0

Come faccio?

[maximum]

<%	
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT TOP 1 * FROM profili ORDER BY ID DESC"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic 

if RecSet.Eof then
   response.write("Il primo record non c'è")
else
   ...FAI QUELLO CHE DESIDERI...				
end if     
%>

[AltF4]

..mi basterebbe che lasciasse i campi vuoti senza darmi errore.

Come posso evitare questo:

if RecSet.Eof then
   response.write("Il primo record non c'è")
else
   ...FAI QUELLO CHE DESIDERI...				
end if     
%>

[maximum]

Non ho capito!?

[AltF4]

<%	
				Set RecSet = Server.CreateObject("ADODB.Recordset")
				Visa = "SELECT TOP 1 * FROM profili ORDER BY ID DESC"
				RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>

Se il database è vuoto non mi da nessun dato, l'importante è che non mi dia errore.
Tutto qua.

Sarò stato più chiaro? ..mah..

[AltF4]

..forse è una cosa talmente stupida che non riesco a trovare la soluzione.

Devo semplicemente selezionare il primo record nel db.

Purtroppo se il record è vuoto mi da errore.

Quindi trovando il modo per selezionare il primo record solo se il db NON è vuoto!!!

Potrebbe essere una soluzione? Ma come si fa???

[maximum]

Prova così:

<%	
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT TOP 1 * FROM profili ORDER BY ID DESC"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic 

if RecSet.Eof then
   response.write("Il primo record non c'è")
else
  if isNull(RecSet("Colonna")) then
     response.write("Riga vuota")  
  else
     ...FAI QUELLO CHE DESIDERI...				
  end if     
end if       
%>

[optime]

Originariamente inviato da AltF4
..forse è una cosa talmente stupida che non riesco a trovare la soluzione.

Devo semplicemente selezionare il primo record nel db.

Purtroppo se il record è vuoto mi da errore.

Quindi trovando il modo per selezionare il primo record solo se il db NON è vuoto!!!

Potrebbe essere una soluzione? Ma come si fa???

si usa sempre e comunque .EOF. se proprio vuoi essere raffinato, usa una COUNT *prima* della SELECT

[AltF4]

..mmm..

Forse sbaglio proprio le select, vediamo se ci riesco ora:

Ho un pagina ASP collegata ad un db, devo prima visualizzare all'interno di una tabella il primo record del db e poi dalla seconda in poi devo visualizzare tutti i record, ho fatto così, ma sicuramente ho sbagliato:

		  <%	
				Set RecSet = Server.CreateObject("ADODB.Recordset")
				Visa = "SELECT TOP 1 * FROM profili ORDER BY ID DESC"
				RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>

poi chiudo:

		  <% RecSet.Close
     		 Connect.Close %>

riapro e seleziono tutti i record meno il primo:

		  <%	
				Set RecSet = Server.CreateObject("ADODB.Recordset")
				Visa = "SELECT * FROM Profili WHERE ID NOT IN (SELECT TOP 1 FROM profili ORDER BY ID DESC) ORDER BY ID DESC"
				RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>
          <%	Do Until RecSet.EOF %>

loop e chiudo:

		<% 		RecSet.MoveNext
				Loop
				RecSet.Close 
		%>

:master:

[maximum]

Prima di:

<%	Do Until RecSet.EOF %>

devi fare:

<%
if RecSet.EOF then
   response.write("Non c'è una mazza!")
else
   Do Until RecSet.EOF 
      ..................
   Loop
end if
%>