Probleme de connection a une BDD MYSQL

Version imprimable

Bonjour a tous :D

Bien évidement si je me présente ici c'est que j'ai quelque petits soucis en programation Asp. Je débute et mes maigres conaissance générale du domaine ne me permettent pas encore de réagir rapidement en fonctions des problèmes rencontrés. Je tourne en rond et je n'aboutis malheureusement a rien ... :cry:

En bref voilà mon Problème.

Je dois travailler sur un projet permettant de mettre en place un relevé statistique (sous forme de Graphique XML) du quotat des impressions Couleur et Noir&Blanc d'un parque d'imprimantes.

Le informations son stoquées dans une base de donnée MySQL.
premièrement j'aimerais déjà pouvoir afficher les informations contenue dans la base, mais même là pour le moment je me heurte à un mur :?

pour simplifier les discutions voilà ce que j'ai:
un fichier ASP a part pour le DSN

Citation:

<%
DSNWEBJETADMIN="DRIVER={MySQL ODBC 3.51 Driver};server=s-myserv2;database=webjetadmin;user=webjetREAD;pwd=webjetREAD;option=3"%>

et Mon doc depuis lequel j'aimerais juste faire s'afficher les information de la base (mieux d'une table en particulié: celle qui denombre bettement sans distinction les impressions générales des machines)
Code:

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 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head>  <script RUNAT="SERVER" LANGUAGE="VBScript"> '***************************GRAPHIQUES IMPRESSIONS USOCOME************************************************' Dim Conn,Rs Set Conn=Server.CreateObject("ADODB.Connection") Set Rs=Server.CreateObject("ADODB.Recordset") Conn.ConnectionString= DSNWEBJETADMIN Conn.Open DSNWEBJETADMIN sub test() count=Request.Form("CountValue") response.write "<br><table border='0' cellpadding='1' cellspacing='1' width='100%'>" response.write "<tr><td bgcolor='#A5C3D2'><small><font face=Arial>"&CountValue&"</font></small></td></tr>" response.write "</table><br>" end sub Set rs= Nothing Conn.close Set conn = Nothing </Script> </head> <body> </body> </html>
Ma base se trouve localis comme suit:
(enfin c'est une BDD dans une autre BDD ... apparement ? > wjadeviceutilization est une BDD inclut dans webjetadmin, de ce que j'en ai compris)

mysql://s-myserv2/browser/webjetadmin/wjadeviceutilization/

La table concerné est [CountValue]

j'aimerais afficher tout les valeurs de cette table ...
de sorte à pouvoir les exploiter via le Graph XML.
(lmais pour le moment j'aimerais déjà les afficher :? Et pour le moment ça marche pas trop donc si qqn voulais bien prendre ma requete en consideration :aie: )

Merci @ tous ! :roll:

Il faudrait que tu interroges ta base via une requete SQL
Du style :

Code:

1
2
3
 
lister = "SELECT * FROM ta_table"
Set rs = OBJdbConnection.execute(lister)

ensuite tu boucles sur ton recordset (ici nommé rs)

Code:

1
2
3
4
5
 
Do While not rs.eof        'tant que ton rs n'est pas vide
       'différentes instructions (affichages, ..etc..)
rs.movenext                 'passe au rs suivant
Loop

18/08/2006, 12h01
DavidDeTroyes
Bon alors concretement tu veux te connecter a ta base MySQL et lister les valeurs ?

Alors deja tu te connecte a ta base qui s'appele BASE qui est à l'adresse IP (localhost si c'est en local), avec UTILISATEUR comme identifiant de connection et MOTDEPASSE comme... heu... comme epinard ;)
Code:

1 2 set base = server.createobject("ADODB.Connection") base.open "DRIVER={MySQL ODBC 3.51 Driver};Server=IP;Database=BASE;Uid=UTILISATEUR;Pwd=MOTDEPASSE"
Ensuite tu ouvre un recordset sur une table TABLE de ta base BASE
Code:

1 2 set table = server.createobject("ADODB.Recordset") table.open "SELECT * FROM TABLE", base, 3, 3
Ensuite tu boucle sur la table en testant au prealable si il existe des enregistrements et tu affiche le champ CHAMP
Code:

1 2 3 4 5 6 7 if not table.EOF then table.movefirst do response.write table("CHAMP") table.movenext loop until table.EOF end if
et enfin tu ferme la table et la base
Code:

1 2 3 4 table.close set table = nothing base.close set base = nothing
J'espére que j'ai pu t'aider

EDIT : oups, grilled... Desolé :aie:
18/08/2006, 15h00
Kookaburra

Merci :P !!!
jvais tester tout ça lundi :?