Problema inspiegabile su apertura connessione con database

**optime** · 16-10-2006, 15:52

posti per piacere il codice vero (qualche riga prima e qualche riga dopo la linea che dà errore)? tnx

**simone75** · 16-10-2006, 16:08

codice:

<%
sottCat = TRIM( Request( "sottCat" ))
dim driverString
dim objConn, catRecSet
driverString="Driver={SQL Server}; Server=mioPC\SQLEXPRESS; Database=ecommerceSQL; Trusted_Connection=yes;"
set objConn=Server.createObject("ADODB.connection")
objConn.Open driverString
set catRecSet=server.CreateObject("ADODB.recordset")
dim query, querySec
querySec="SELECT DISTINCT categoria FROM prodotti"
query="declare @today datetime set @today = dateadd(yy,0,getdate()) SELECT prodotti.codice, prodotti.descrizione, prodotti.desc_tecnica, prodotti.foto, prodotti.marca, prodotti.prezzo, prodotti.prezzo_promo, prodotti.promo, prodotti.message_promo, LI.prezzoLIST FROM prodotti INNER JOIN listini AS LI on prodotti.id= li.idprodotti WHERE sottocategoria='" & sottCat & "' AND elimina='false' AND(@today  BETWEEN LI.DATAINIZIO AND LI.DATAFINE) AND LI.DATAFINE = (SELECT MIN(LISTINO.DATAFINE) FROM lISTINI AS LISTINO WHERE LISTINO.idprodotti = LI.idprodotti AND @today  BETWEEN LISTINO.DATAINIZIO AND LISTINO.DATAFINE ) AND LI.DATAINIZIO = (SELECT MAX(LISTINO.DATAINIZIO) FROM LIstini AS LISTINO WHERE LISTINO.IDPRODOTTI = LI.IDPRODOTTI AND LISTINO.DATAFINE = LI.DATAFINE AND @today  BETWEEN LISTINO.DATAINIZIO AND LISTINO.DATAFINE) ORDER BY prezzo, codice"
queryTer="SELECT DISTINCT marca FROM prodotti WHERE sottocategoria='" & sottCat & "' AND elimina = 'false'"
querySql="SELECT Max(prezzo) as massimo, Min(Prezzo) as minimo FROM prodotti WHERE sottocategoria='" & sottCat & "' AND elimina = 'false'"
catRecSet.open querySec, objConn
%>
<html>
<head>fhhhg</head>
<body>
<% WHILE NOT catRecSet.EOF %>
.......viene stratta la querysec.....
<%
catRecSet.MoveNext
WEND									
catRecSet.Close
%>
....di seguito le altre query con lo stesso procedimento sempre chiudendo il recordset......
....e poi la query incriminata
<%
catRecSet.open query					
WHILE NOT catRecSet.EOF  
%>
<tr id="header3">
<td width="60" height="50" bgcolor="#FFFFFF" align="center">
<a href="dettprod.asp?pid=<%=catRecSet("codice")%>">
<font face="Arial" style="font-size: 7pt" color="#000000">
<%=catRecSet("codice")%></font>

[img]<%=catRecSet([/img]"></a></td>
<td width="170" height="50" align="center" bgcolor="#FFFFFF">
<font color="000000" style="font-size: 8pt; text-decoration: none" face="Arial">
<a href="dettprod.asp?pid=<%=catRecSet("codice")%>">
-<%=catRecSet("marca")%>-

<%=catRecSet("descrizione")%>
</a></font>
<%
promo=catRecSet("promo")
IF promo = true THEN
%>


<font face="Arial" style="font-size: 8pt;" color="#FF0000">
<%
Response.Write catRecSet("message_promo")
END IF
%>
</font></td>
<td width="50" height="50" align="center" bgcolor="#FFFFFF">
<font color="000000" style="font-size: 8pt; text-decoration: none" face="Arial">
<%                            
IF promo = true THEN
Response.Write formatCurrency(catRecSet("prezzo_promo"))
ELSE
Response.Write formatCurrency(catRecSet("prezzo"))
END IF
%></font>
</td>
<%
IF promo = true THEN
prezzo = catRecSet("prezzo_promo")
ELSE
prezzo = catRecSet("prezzo")
END IF
%>
<td width="70" height="50" align="center" bgcolor="#FFFFFF">
<a href="javascript:;" onclick="apriFinestra('carrello2.asp?cod=<%=catRecSet("codice")%>&desc=<%=catRecSet("descrizione")%>&price=<%=(prezzo)%>');">
[img]img/agg_carrello.gif[/img]</a></td>
</tr>
<%
catRecSet.MoveNext
WEND
catRecSet.Close
objConn.Close				
catRecSet=null
objConn=null								
%>

**optime** · 16-10-2006, 16:11

se queste due ti paiono uguali....

catRecSet.open querySec, objConn

....e poi la query incriminata

catRecSet.open query

manca qualcosa, no?

**simone75** · 16-10-2006, 16:17

il problema non è quello, avevo già provato ad aggiungere objConn ma sempre lo stesso errore mi dà. Ripeto, il tutto funzionava bene prima di cambiare la query. Se il problema stava in qualsiasi altro punto della pagina non doveva funzionare neanche prima, invece ha smesso di funzionare solo dopo aver sostituito la query.

**optime** · 16-10-2006, 16:24

1. senza la connessione non funzia.
2. prova a distruggere e a ricreare il recordset prima di aprirlo (a volte ado va in confusione qiunado continui a riutilizzare lo stesso recordset con query diverse)
3. controlla sempre eof

**sspintux** · 16-10-2006, 16:39

Originariamente inviato da simone75
il problema non è quello, avevo già provato ad aggiungere objConn ma sempre lo stesso errore mi dà. Ripeto, il tutto funzionava bene prima di cambiare la query. Se il problema stava in qualsiasi altro punto della pagina non doveva funzionare neanche prima, invece ha smesso di funzionare solo dopo aver sostituito la query.

...ma ti costa proprio tanto aggiungere le 3 righe
che seguono e provare ?

(ovviamente con tutto il rispetto e la stima possibile
per optime che non è certo in discussione)

codice:

'tua apertura recordset
catRecSet.open query

'righe da aggiungere
while catRecSet.State= 0 'adstateclosed
   set catRecSet=catRecSet.NextRecordset
wend	
'fine righe da aggiungere

**sspintux** · 16-10-2006, 16:51

Originariamente inviato da sspintux
...ma ti costa proprio tanto aggiungere le 3 righe
che seguono e provare ?

(ovviamente con tutto il rispetto e la stima possibile
per optime che non è certo in discussione)

codice:

'tua apertura recordset
catRecSet.open query

'righe da aggiungere
'EDIT aggiunto : and (not (catRecSet is nothing))
while (catRecSet.State= 0) and (not (catRecSet is nothing))  'adstateclosed=0
   set catRecSet=catRecSet.NextRecordset
wend	
'fine righe da aggiungere

**simone75** · 16-10-2006, 17:20

MIRACOLO!!!!!!!!!
Grande sspintux scusa se non ti ho dato retta prima ma stavo provando a seguire quello che mi diceva optime (che come sempre è un grande), e due cose contemporaneamente non riesco a fare.
ANCORA GRAZIEEEE!!!

**simone75** · 16-10-2006, 17:22

Ancora una domanda...ma qual'era il problema, non credo di aver capito bene.....

**sspintux** · 16-10-2006, 17:32

Originariamente inviato da simone75
MIRACOLO!!!!!!!!!
Grande sspintux scusa se non ti ho dato retta prima ma stavo provando a seguire quello che mi diceva optime (che come sempre è un grande), e due cose contemporaneamente non riesco a fare.
ANCORA GRAZIEEEE!!!

... grazie tante; ma come sempre optime docet. Quindi :

...tutti quei i bacetti che vedo, convertiti in pinte/galloni/boccali/damigiane equivalgono a ??

Discussione: Problema inspiegabile su apertura connessione con database

Strumenti discussione

Ricerca discussione

Visualizza

Permessi di invio