IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

ASP Discussion :

Problème de recordset


Sujet :

ASP

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    107
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 107
    Points : 35
    Points
    35
    Par défaut Problème de recordset
    Bonjour à tous,
    J'ai une erreur rien ne s'affiche je vois pas d'ou ça peut venir, mon code semble bon:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    75
    76
    77
    78
    79
    80
    81
    82
    83
    84
    85
    86
    87
    88
    89
    90
    91
    92
    93
    94
    95
    96
    97
    98
    99
    100
    101
    102
    				<%
    											if Len&#40;Request.Form&#40;"Cmd_semaine"&#41;&#41; > 0 Then
    dim objRecordset
    dim numero
    dim i
    dim j
    dim objCnx
    numero=Request.Form&#40;"num_semaine"&#41;	
    i=2
    j=0
    dim SQL
    set objCnx = dbConnect&#40;"BNW0001B" , "IUSR_BNW0001B" , "VF85DS" , ""&#41; 
     
     
                            SQL= " SELECT num_dossier , nom_dossier , date_dossier , commentaire, lien FROM JURIDIQUE, PUBLICATION WHERE PUBLICATION.num_publication=JURIDIQUE.num_publication ORDER BY date_dossier DESC "
     
    set objRecordset=Server.CreateObject&#40;"ADODB.Recordset"&#41;
    objRecordset.Open SQL, objCnx
    Do While Not objRecordset.EOF %>
     
     
    								<table border="1" width="100%" height="1">				
                                <tr>
                                  <td width="86%" height="1" valign="top" bordercolor="#008080" bgcolor="#008080">
                                    <form method="POST" action="--WEBBOT-SELF--">
                                      <!--webbot bot="SaveResults" startspan
                                      U-File="_private/form_results.txt"
                                      S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--webbot
                                      bot="SaveResults" endspan -->
                                      <p>&nbsp;<input type="text" name="Titre" size="82" value="<%objRecordset&#40;nom_breve&#41;%>" style="color&#58; #FFFFFF; background-color&#58; #008080; border-style&#58; solid; border-color&#58; #000000"></p>
                                    </form>
                                  </td>
                                  <td width="14%" height="1" valign="top">
                                  <form method="POST" action="--WEBBOT-SELF--">
                                    <!--webbot bot="SaveResults" startspan
                                    U-File="_private/form_results.txt"
                                    S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="1"><!--webbot
                                    bot="SaveResults" endspan -->
                                    <p><input type="text" name="date_dossier" size="11" value="<%objRecordset&#40;date_dossier&#41;%>"></p>
                                  </form>
                                  </td>
                                </tr>
                                <tr>
                                  <td width="100%" height="41" valign="top" bgcolor="#C0C0C0" colspan="2">
                                    <form method="POST" action="--WEBBOT-SELF--">
                                      <!--webbot bot="SaveResults" startspan
                                      U-File="_private/form_results.txt"
                                      S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="2"><!--webbot
                                      bot="SaveResults" endspan -->
                                      <p><input type="text" name="Corp" size="113" value="<%objRecordset&#40;commentaire&#41;%>" style="background-color&#58; #C0C0C0; font-family&#58; Arial; font-size&#58; 10 pt"></p>
                                      <p>&nbsp;</p>
                                    </form>
                                  </td>
                                </tr>
                                <tr>
                                  <td width="100%" height="9" valign="top" colspan="2">
                                  <form method="POST" action="--WEBBOT-SELF--">
                                    <!--webbot bot="SaveResults" startspan
                                    U-File="_private/form_results.txt"
                                    S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="3"><!--webbot
                                    bot="SaveResults" endspan -->
                                    <p><img border="0" src="images/epinglerouge.gif"><input type="text" name="source" size="111" value="<%objRecordset&#40;source&#41;%>" style="color&#58; #0066FF; font-family&#58; Arial; font-size&#58; 10 pt"></p>
                                  </form>
                                  </td>
                                </tr>
     
                                <tr>
                                  <td width="86%" height="1001" valign="top" rowspan="2">
                                  &nbsp;
                                  <p>&nbsp;</p>
                                  <p>&nbsp;
                                  <p>&nbsp;
                                  <p>&nbsp;</p>
                                  <p>&nbsp;
                                  </td>
                                  <td width="14%" height="3" bgcolor="#008080">
                                  <form method="POST" action="--WEBBOT-SELF--">
                                    <!--webbot bot="SaveResults" startspan
                                    U-File="_private/form_results.txt"
                                    S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="4"><!--webbot
                                    bot="SaveResults" endspan -->
                                    <p><input type="text" name="lien" size="11" value="<%objRecordset&#40;lien&#41;%>" style="background-color&#58; #008080; color&#58; #FFFFFF"></p>
                                  </form>
                                  </td>
                                </tr>
     
                                <tr>
                                  <td width="14%" height="977">
                                  </td>
                                </tr>
    									 </table>
     
     <%
                                       i=i+1
     
    										objRecordset.MoveNext
     
    										Loop
    										objRecordset.Close
    										Set objRecordset=Nothing                    
    	end if
    											%>
    Merci à vous tout au long de ce développement

  2. #2
    Expert éminent
    Avatar de Immobilis
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2004
    Messages
    6 559
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Mars 2004
    Messages : 6 559
    Points : 9 506
    Points
    9 506
    Par défaut
    Salut,
    Normalement qd y'a une erreur y'a justement qqch qui s'affiche:
    - le code d'erreur
    - et la ligne
    C'est plus facile pour nous que de lire tout ton code. Essaye d'etre logique. Enlève, les morceau "inutiles" et ajoute les au fur et à mesure.
    En plus t'as des T'as fait ta page avec quel logiciel??
    A+
    "Winter is coming" (ma nouvelle page d'accueil)

  3. #3
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    107
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 107
    Points : 35
    Points
    35
    Par défaut
    avec Front page obliger d'utiliser ça pour le site intranet: Partenaria microsoft dans mon entreprise

  4. #4
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    107
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 107
    Points : 35
    Points
    35
    Par défaut
    Voila le code erreur:

    Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
    [Microsoft][ODBC SQL Server Driver][SQL Server]'num_publication' : nom de colonne ambigu.
    /juridique/actualite.asp, line 103
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    objRecordset.Open SQL, objCnx
    Ca me semble venir de la requête pourtant elle marche sous SQL Server

  5. #5
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    107
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 107
    Points : 35
    Points
    35
    Par défaut
    J'ai été sur un site et j'ai vu que je m'etait trompé dans mon code voila la correction.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    	<%
    											if Len&#40;Request.Form&#40;"Cmd_semaine"&#41;&#41; > 0 Then
    dim objRecordset
    dim numero
    dim i
    dim j
    dim objCnx
    numero=Request.Form&#40;"num_semaine"&#41;	
    i=2
    j=0
    dim SQL
    set objCnx = dbConnect&#40;"BNW0001B" , "IUSR_BNW0001B" , "VF85DS" , ""&#41; 
    set objRecordset=Server.CreateObject&#40;"ADODB.Recordset"&#41;
     
                           objRecordset.Open " SELECT num_breve , nom_breve , date_breve , source, lien, date_publication FROM BREVE, PUBLICATION WHERE PUBLICATION.num_publication=BREVE.num_publication AND num_publication<=numero  ORDER BY date_breve DESC", objCnx 
                          	= objRecordsetMoveFirst
    Do While Not objRecordset.EOF 
     
    %>
    Par contre j'ai une erreur a cette ligne:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    objRecordset.Open " SELECT num_breve , nom_breve , date_breve , source, lien, date_publication FROM BREVE, PUBLICATION WHERE PUBLICATION.num_publication=BREVE.num_publication AND num_publication<=numero  ORDER BY date_breve DESC", objCnx
    L'erreur est :
    Type d'erreur :
    Erreur de compilation Microsoft VBScript (0x800A0400)
    Instruction attendue
    /juridique/actualite.asp, line 101
    [/quote]

  6. #6
    Expert éminent
    Avatar de Immobilis
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2004
    Messages
    6 559
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Mars 2004
    Messages : 6 559
    Points : 9 506
    Points
    9 506
    Par défaut
    Mm si tu travaille avec FP t'es pas obligé d'utiliser les bot. C'est encore toi le developpeur.
    num_publication<=numero ORDER
    A mon avis "numero" est une variable, donc:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    num_publication<=" & numero & "  ORDER
    A+
    "Winter is coming" (ma nouvelle page d'accueil)

  7. #7
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    107
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 107
    Points : 35
    Points
    35
    Par défaut
    Thanks j'y avais plus penser à ça merci

  8. #8
    Expert éminent
    Avatar de Immobilis
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2004
    Messages
    6 559
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Mars 2004
    Messages : 6 559
    Points : 9 506
    Points
    9 506
    Par défaut
    "Winter is coming" (ma nouvelle page d'accueil)

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Problème avec recordset, il peux pas lire les type binaire
    Par deeps123 dans le forum VB 6 et antérieur
    Réponses: 2
    Dernier message: 16/04/2007, 17h22
  2. Problème de recordset avec requête SELECT
    Par gwinyam dans le forum Requêtes et SQL.
    Réponses: 13
    Dernier message: 08/03/2007, 11h53
  3. Réponses: 13
    Dernier message: 15/06/2006, 12h31
  4. Problème de RecordSet
    Par fredhali2000 dans le forum Access
    Réponses: 4
    Dernier message: 05/06/2006, 17h41
  5. Problème avec recordset
    Par Skieur38 dans le forum VB 6 et antérieur
    Réponses: 9
    Dernier message: 30/03/2006, 17h20

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo