begin process at 2012 05 28 05:25:19
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > Forum > 

ASP.NET

 > 

Divers

 > 

Autre

 > 

problème chargement page asp

Derniers messages déposésPoser une question dans le forum ou lancer une discussion

problème chargement page asp

dimanche 12 août 2007 à 15:47:19 | problème chargement page asp

nina82
salut tous le monde :mon problème est que je doit fonctionné un site web developé pas untre paersone avec ASP et moi je connait rien du tous
ce site connecte a une basse de donné distante ingre sous unix.
j'ai instalé l'odbc, j'ai creé le noueud de connection, j'ai ajouté le iis,j'ai creé l'alias dans ODBC mais lorsque je clik sur des lien .asp voilà le message d'erreur :
Erreur de compilation Microsoft VBScript
error '800a0401'
Fin d'instruction attendue
/iisHelp/common/500-100.asp, line 11
Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^
Microsoft OLE DB Provider for ODBC Drivers
error '80040e21'
Ce pilote ODBC ne prend pas en charge les propriétés demandées.
/sgc/creances_energie.asp, line 25

***************
le code source de cette ce lien est le suivant:
<html>
  <head>
  <title>Creances energie</title>
<LINK media=all href="sonelgaz.css" type=text/css rel=stylesheet> 
  </head>
<body>
<Center>
<%
Temps=Timer
Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.RecordSet")
Set RS2= Server.CreateObject("ADODB.RecordSet")
Conn.Open "SGC"
dim dir,total
Total=0.0
Sql = " select As_47003,As_47005,AS_47004,As_47003+As_47005+AS_47004 As Dir"
Sql = Sql + " from Solde_compte_ao"
' Response.write sql + " <br>"
RS.Open sql, Conn, 1,1
Dir=0.0                **********c'est la ligne 25 qui pose problème?
%>
<Font Size=+2>
Basse Tension / Basse Pression
</font>
<br>
<TABLE BORDER=0 ALIGN="CENTER" CELLSPACING=1 WIDTH="90%">
<tr>
<td> <Div Align="Center">
<Font Size=+2>
Abonnés Ordinaires
</font>
<TABLE BORDER=1 ALIGN="CENTER" CELLSPACING=1 WIDTH="60%">
    <Tr> <Div ALIGN="CENTER">
      <Th COLSPAN=1> Compte</TD>
      <Th COLSPAN=1> Montant</TD>
    </Tr>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> 47003</TD>
      <TD COLSPAN=1> <Div Align="Right"> <%=FormatNumber(Rs("As_47003"))%></TD>
    </TR>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> 47004</TD>
      <TD COLSPAN=1> <Div Align="Right"> <%=FormatNumber(Rs("As_47004"))%></TD>
    </TR>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> 47005</TD>
      <TD COLSPAN=1> <Div Align="Right"> <%=FormatNumber(Rs("As_47005"))%></TD>
    </TR>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> <b>Total</TD>
      <TD COLSPAN=1> <Div Align="Right"> <b><%=FormatNumber(Rs("Dir"))%></TD>
    </TR>
<%Total=Total+Cdbl(Rs("Dir"))%>
</TABLE>
<%Rs.Close
Sql = " select *"
Sql = Sql + " from Solde_compte_fsm"
' Response.write sql + " <br>"
RS.Open sql, Conn, 1,1
Dir=0.0
%>
</td>
<td> <Div Align="Center">
<Font Size=+2>
Abonnés FSM
</font>
<TABLE BORDER=1 ALIGN="CENTER" CELLSPACING=1 WIDTH="60%">
    <TR> <Div ALIGN="CENTER">
      <Th COLSPAN=1> Compte</TD>
      <Th COLSPAN=1> Montant</TD>
    </TR>
<%Do while not rs.eof 
Dir=Dir+Rs("Ancien_Solde")
Total=Total+Cdbl(Rs("Ancien_Solde"))%>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> <%=Rs("num_compte")%></TD>
      <TD COLSPAN=1> <Div Align="Right"> <%=FormatNumber(Rs("Ancien_Solde"))%></TD>
    </TR>
<% Rs.moveNext
Loop%>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> <b> Total</TD>
      <TD COLSPAN=1> <Div Align="Right"> <b><%=FormatNumber(Dir)%></TD>
    </TR>
</TABLE>
<%Rs.Close
Sql = " select *"
Sql = Sql + " from Solde_compte_mt_mp"
' Response.write sql + " <br>"
RS.Open sql, Conn, 1,1
Dir=0.0
%>
</td>
</tr>
</table>
<br>
<Font Size=+2>
Moyenne Tension / Moyenne Pression
</font>
<br>
<TABLE BORDER=1 ALIGN="CENTER" CELLSPACING=1 WIDTH="30%">
    <TR> <Div ALIGN="CENTER">
      <Th COLSPAN=1> Compte</TD>
      <Th COLSPAN=1> Montant</TD>
    </TR>

<%Do while not rs.eof 
Dir=Dir+Rs("Ancien_Solde")
Total=Total+Cdbl(Rs("Ancien_Solde"))%>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> <%=Rs("num_compte")%></TD>
      <TD COLSPAN=1> <Div Align="Right"> <%=FormatNumber(Rs("Ancien_Solde"))%></TD>
    </TR>
<% Rs.moveNext
Loop%>
    <TR> <Div ALIGN="CENTER">
      <TD COLSPAN=1> <b>Total</TD>
      <TD COLSPAN=1> <Div Align="Right"><b> <%=FormatNumber(Dir)%></TD>
    </TR>
</TABLE>
<br>
<hr Width="50%" Size=5>
<h3>
Total Créances Energie :
<Font Color="Red">
<%=FormatNumber(Total)%>
</font>
</h3>
<%Rs.Close
Conn.Close
Set rs = Nothing
Set conn = Nothing
%>
</body>
</html>


merci d'avance


Cette discussion est classée dans : sql, rs, conn, total, solde

Répondre à ce message

Sujets en rapport avec ce message

connexionn sans dns [ par nickg ] bonjour,a l'origine l'application un "chat" est avec une connexion dnsje voudrai je faire marcher sans dns Malgré plusieurs heures de recherches j'en erreur '80040e31' [ par vinou02 ] Bonjour j'ai cette erreur sur plusieurs de mes pages:Microsoft OLE DB Provider pour SQL Server error '80040e31' Expiration du délai /commandes_nouveau SQL Server et les date !!!!! [ par ana_adil ] Salut, Je suis newbie en ASP, je travail sur une agenda mais j'ai un probleme avec les requete sql, est ce que vous pouvez m'aider?le probleme c'est q authentification (login et password) pour espace verouille [ par mezzanine ] Bonjour,Je me présente Mezzanine, apprenti developpeurs (débutant).Je vous expose mon problème :Je souhaite par l'intermédiaire d'un formulaire (login RECORDCOUNT avec une SP [ par Troyan ] Bonjour,voici mon petit souci.SQL="Select * from FAMILLES"RS.OPEN SQL, Conn, 1lorsque je demande le recordcount de cette manniere ca marche.Par contre ADO & Sql Server 2000 [ par yh ] Bonjour,J'utilise la méthode addnew que j'applique à un RecordSet après avoir ouvert une connexion avec ma base Sql : rs.open "MaTable", db_conn, , Les résultats de la requête SQL n'aparaissent pas [ par ronaldo1 ] Le résultat de la requête n'affiche qu'une seul fois la valeur de net une infité de: '&n&' alors qu'il doit avoir que 5 résultats à le requête (TOP 5) probleme connection Access / ASP [ par peguman ] Je suis en ASp et lors de ma requete j'ai l'erreur suivante :Microsoft OLE DB Provider for ODBC Drivers erreur '80040e10' [Microsoft][Pilote ODBC Micr Extraction de LDAP vers SQL [ par snoy_doc ] j'essaie d'extraire des données de LDAP vers SQL, quand le nombre d'enregistrement n'est pas grand j'ai mis mon server.scriptTimeout=3000même 150000, Savoir si une requete à fonctionner ????? [ par rich25200 ] Bonjour,J'exécute une requete SQL du genre RS = "select * from membre"Puis RS.open SQL...J'aimerai savoir coment on peut tester si la requete a bien f


Nos sponsors


Sondage...

Comparez les prix


iPod touch 3rd Generation (64 Go)
Entre 374€ et 379€

Visiter le guide achat

CalendriCode

Mai 2012
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Consulter la suite du CalendriCode

A découvrir
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,510 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)