Retour à Forum de programmation

Microsoft Cursor Engine erreur "80004005" - S'IL VOUS PLAÎT AIDE-MOI!

  • mindtripstudios
  • Newbie
  • Newbie
  • No Avatar
  • Inscription: Juin 14, 2003
  • Messages: 5
  • Status: Offline

Message Juin 14th, 2003, 1:57 pm

http://www.niamecollections.com/newsite ... ion=search - Si vous allez dans ce lien, vous verrez l'erreur j'obtiens...Il va comme suit:

Quote:
Microsoft Cursor Erreur du moteur "80004005"
Fournisseur de données ou un autre service a renvoyé un état E_FAIL.

/ newsite / SBT. asp, ligne 70


Je ne pense pas qu'il y ait une erreur dans cette ligne (mais je souhaite me tromper et de vous les gars / filles peut m'aider....) Im un besoin urgent d'une résolution...

Voici le code:
Code: [ Select ]
<table width="390" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="390" height="5" colspan="3"></td>
</tr>
<%
If action = "search" Then
Connect.open Cstring

Set rsSearch = Server.CreateObject("ADODB.Recordset")
sqlcom = whereclause
rsSearch.CursorLocation = 3
rsSearch.Open sqlcom, Connect, 3

numresults = rsSearch.RecordCount

If numresults = -1 Then
numresults = 0
End If

i = 1
%>
<tr>
<td height="18" colspan="2" valign="top" background="images/bar.gif"> <div align="center"></div>
<div align="center"><img src="images/searchr.gif" width="110" height="18"></div></td>
</tr>
<tr>
<td width="100%" height="20" valign="top"><strong><font size="2" face="Tahoma">Results: <%=Response.Write(numresults)%> </font></strong></td>
</tr>
<tr>
<td colspan="2" valign="top"> <%
IF Not rsSearch.eof Then
Do Until rsSearch.eof
%><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom">
<td height="25" colspan="2"><font size="2" face="Tahoma"><strong><%=i%>.</strong> <em><a href='product.asp?ID=<%=rsSearch("productID")%>'><%=rsSearch("productName")%></a></em></font></td>
</tr>
<tr>
<td width="10%"> </td>
<td width="90%"><font size="2" face="Tahoma"><%=left(rsSearch("productDesc"), 100)%>...</font></td>
</tr>
<tr>
<td colspan="2"><div align="right"><strong><font color="930025" size="2" face="Tahoma">$<%=rsSearch("productPrice")%></font></strong></div></td>
</tr>
</table>
<%
i = i + 1
rsSearch.MoveNext
Loop%></td>
</tr>
<tr>
<td colspan="2" valign="top"> </td>
</tr>
<%
Else
%>
<tr align="center">
<td colspan="2"><font size="2" face="Tahoma"><br>
Sorry, there are no results for the type you selected at this time. You
can search again or check back soon for updates.<br>
</font></td>
</tr>
<tr align="center">
<td height="40" colspan="2"> </td>
</tr>
<%
End If
%>
  1. <table width="390" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  2. <tr>
  3. <td width="390" height="5" colspan="3"></td>
  4. </tr>
  5. <%
  6. If action = "search" Then
  7. Connect.open Cstring
  9. Set rsSearch = Server.CreateObject("ADODB.Recordset")
  10. sqlcom = whereclause
  11. rsSearch.CursorLocation = 3
  12. rsSearch.Open sqlcom, Connect, 3
  14. numresults = rsSearch.RecordCount
  16. If numresults = -1 Then
  17. numresults = 0
  18. End If
  20. i = 1
  21. %>
  22. <tr>
  23. <td height="18" colspan="2" valign="top" background="images/bar.gif"> <div align="center"></div>
  24. <div align="center"><img src="images/searchr.gif" width="110" height="18"></div></td>
  25. </tr>
  26. <tr>
  27. <td width="100%" height="20" valign="top"><strong><font size="2" face="Tahoma">Results: <%=Response.Write(numresults)%> </font></strong></td>
  28. </tr>
  29. <tr>
  30. <td colspan="2" valign="top"> <%
  31. IF Not rsSearch.eof Then
  32. Do Until rsSearch.eof
  33. %><table width="100%" border="0" cellspacing="0" cellpadding="0">
  34. <tr valign="bottom">
  35. <td height="25" colspan="2"><font size="2" face="Tahoma"><strong><%=i%>.</strong> <em><a href='product.asp?ID=<%=rsSearch("productID")%>'><%=rsSearch("productName")%></a></em></font></td>
  36. </tr>
  37. <tr>
  38. <td width="10%"> </td>
  39. <td width="90%"><font size="2" face="Tahoma"><%=left(rsSearch("productDesc"), 100)%>...</font></td>
  40. </tr>
  41. <tr>
  42. <td colspan="2"><div align="right"><strong><font color="930025" size="2" face="Tahoma">$<%=rsSearch("productPrice")%></font></strong></div></td>
  43. </tr>
  44. </table>
  45. <%
  46. i = i + 1
  47. rsSearch.MoveNext
  48. Loop%></td>
  49. </tr>
  50. <tr>
  51. <td colspan="2" valign="top"> </td>
  52. </tr>
  53. <%
  54. Else
  55. %>
  56. <tr align="center">
  57. <td colspan="2"><font size="2" face="Tahoma"><br>
  58. Sorry, there are no results for the type you selected at this time. You
  59. can search again or check back soon for updates.<br>
  60. </font></td>
  61. </tr>
  62. <tr align="center">
  63. <td height="40" colspan="2"> </td>
  64. </tr>
  65. <%
  66. End If
  67. %>
  • Anonymous
  • Bot
  • No Avatar
  • Inscription: 25 Feb 2008
  • Messages: ?
  • Loc: Ozzuland
  • Status: Online

Message Juin 14th, 2003, 1:57 pm

  • Bigwebmaster
  • Site Admin
  • Site Admin
  • Avatar de l’utilisateur
  • Inscription: Déc 20, 2002
  • Messages: 8925
  • Loc: Seattle, WA & Phoenix, AZ
  • Status: Offline

Message Juin 14th, 2003, 7:07 pm

Bien que le code que vous avez fourni, qui est en ligne #70 pour sbt.asp
Ozzu Hosting - Want your website on a fast server like Ozzu?
  • mindtripstudios
  • Newbie
  • Newbie
  • No Avatar
  • Inscription: Juin 14, 2003
  • Messages: 5
  • Status: Offline

Message Juin 14th, 2003, 7:11 pm

Code: [ Select ]
numresults = rsSearch.RecordCount
  • Bigwebmaster
  • Site Admin
  • Site Admin
  • Avatar de l’utilisateur
  • Inscription: Déc 20, 2002
  • Messages: 8925
  • Loc: Seattle, WA & Phoenix, AZ
  • Status: Offline

Message Juin 15th, 2003, 1:13 am

Il serait peut-être retourner cette erreur parce que ce n'est pas mis en œuvre. Consultez cette page chez Microsoft:

http://support.microsoft.com/default.as ... US;q269361

HOWTO: contourner la limitation MaxRecord que ADO n'est pas mis en œuvre dans DS OLEDB Provider ADsDSOObject

Cet article a été publié précédemment sous Q269361
RESUME
Le MaxRecord méthode de réduction d'un objet Recordset ADO ne sont pas mises en œuvre dans les services d'annuaire (DS) ADsDSOObject fournisseur OLEDB.

Cet article fournit une Microsoft Visual Basic et Microsoft Visual Basic Script échantillon qui montrent comment vous pouvez contourner cette limitation.
Ozzu Hosting - Want your website on a fast server like Ozzu?
  • Bigwebmaster
  • Site Admin
  • Site Admin
  • Avatar de l’utilisateur
  • Inscription: Déc 20, 2002
  • Messages: 8925
  • Loc: Seattle, WA & Phoenix, AZ
  • Status: Offline

Message Juin 15th, 2003, 1:15 am

Vous pouvez également vous assurer que vous utilisez ADO 2.5, 2.6 - vous pouvez faire une recherche pour support.microsoft.com que je pense.
Ozzu Hosting - Want your website on a fast server like Ozzu?
  • mindtripstudios
  • Newbie
  • Newbie
  • No Avatar
  • Inscription: Juin 14, 2003
  • Messages: 5
  • Status: Offline

Message Juin 15th, 2003, 7:31 am

Merci beaucoup, mon équipe va essayer que sur.... Si vous avez d'autres idées s'il vous plaît de les intégrer. Mauvais poste les résultats à cette trop...
  • mindtripstudios
  • Newbie
  • Newbie
  • No Avatar
  • Inscription: Juin 14, 2003
  • Messages: 5
  • Status: Offline

Message Juin 15th, 2003, 7:34 am

Comment puis-je utiliser cette solution dans mon code - merci

Page 1 sur 1

Afficher de l'information

  • Total des messages de ce sujet: 7 messages
  • Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 194 invités
  • Vous ne pouvez pas poster de nouveaux sujets
  • Vous ne pouvez pas répondre aux sujets
  • Vous ne pouvez pas éditer vos messages
  • Vous ne pouvez pas supprimer vos messages
  • Vous ne pouvez pas joindre des fichiers
 
 

© 2011 Unmelted, LLC. Ozzu® est une marque déposée de Unmelted, LLC