errore 500

[zio jerry]

Salve a tutti,
ho un problema legato al db SQL Server....credo. In pratica ho realizzato un piccolo programmino in asp che in locale gira alla perfezione. Nel momento in cui lo pubblico e faccio una ricerca all'interno del db (in locale impiega circa 10 - 15 secondi) la pagine scoppi dandomi un errore 500.

Come posso risolvere??? Vi prego è importante

[soundforgers]

inanzitutto disabilita "Mostra messaggi di errore http brevi" da strumenti-opzioni internet-avanzate.
poi ti dovrebbe dare un errore più dettagliato...
qual'è?

[zio jerry]

ecco cosa mi da come risposta:

Oggetto risposta error 'ASP 0251 : 80004005'

Superato il limite del buffer delle risposte

/cercamerce.asp, line 0

Il limite configurato del buffer delle risposte è stato superato con l'esecuzione della pagina ASP.

[wallrider]

è il momento di mostrare un pò di codice

[zio jerry]

se può servire volentieri...è un ciclo ma enorme

<%
		Set objview = Server.CreateObject( "ADODB.Connection" )	
		objview.Open "Provider=SQLOLEDB;Server=ss02;Database=Simonetto;Uid=sa;Pwd=sa;"
		set objRS =Server.CreateObject("ADODB.Recordset")
		objRS.Open SQL, objview
		do while not objRS.EOF
	%>
	<tr bgcolor="LemonChiffon" onmouseover="this.bgColor='#a4b7ff'" onmouseout="this.bgColor='LemonChiffon'"  style="cursor: hand;" onclick="passadati('<%response.Write objRS("Item")%>','<%response.Write replace(objRS("Description"),"""","\'")%>','<%response.Write objRS("BaseUoM")%>','<%response.Write formatnumber(objRS("BasePrice"),2)%>','<%response.Write objRS("discountformula")%>')">
		<td><%response.Write objRS("Item")%></td>
		<%
			if objRS("Producer")="" then
		%>
		<td  align="center">-</td>
		<%
			else
				Set objviewProd = Server.CreateObject( "ADODB.Connection" )	
				objviewProd.Open "Provider=SQLOLEDB;Server=ss02;Database=Simonetto;Uid=sa;Pwd=sa;"
				set objRSProd =Server.CreateObject("ADODB.Recordset")
				SQLProd="SELECT * FROM MA_Producers Where Producer = '"&objRS("Producer")&"'"
				objRSProd.Open SQLProd, objviewProd
		%>
		<td><%response.Write objRSProd("CompanyName")%></td>
		<%
				objRSProd.Close
				set objRSProd = Nothing
				objviewProd.Close
				set objviewProd = Nothing
			end if
		%>
		</td>
		<td><%response.Write objRS("Description")%></td>
		<td align="center"><%response.Write objRS("BaseUoM")%></td>
		<td align="center"><%response.Write objRS("Discountformula")%></td>
		<td  align="right"><%response.Write formatnumber(objRS("BasePrice"),2)%></td>
	</tr>
	<%
		objRS.MoveNext
		loop
		objRS.Close
		set objRS = Nothing
		objview.Close
		set objview = Nothing
	%>

Un'altra cosa...ho fatto un controllo in locale ci mette un 20 sec circa, ma non credo sia rilevante

[zio jerry]

allora...
ho degli aggiornamenti
Ho risolto il problema dell'erroe famoso con

response.Buffer=false

adesso,però visualizzo parte dell'elenco, arrivato ad un certo punto mi spara questo messaggio:

ADODB.Field error '80020009' 

Il record corrente corrisponde all'inizio o alla fine del file oppure è stato eliminato. Per eseguire l'operazione richiesta è necessario disporre di un record corrente.

[wallrider]

apri 2 connection sul solito db e poi fai una query ogni volta per risolvere dei dati da MA_producers

sei sicuro che non si possa fare tutto con una INNER JOIN?

[zio jerry]

effettivamente devo verificare...ma credo si possa fare.

In ogni caso ho trovato il problema. Non pescava un record nella seconda select.

Tutto risolto...sei stato gentilissimo,

grazie