begin process at 2012 02 15 16:01:40
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

ASP

 > ASP & MYSQL

ASP & MYSQL


 Information sur la source

Note :
9,5 / 10 - par 6 personnes
9,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :ASP Classé sous :asp, mysql, odbc, myodbc, adodb Niveau :Initié Date de création :01/03/2001 Vu :31 886

Auteur : Nix

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (8)
Ajouter un commentaire et/ou une note


 Description

Vous trouverez ci dessous un exemple de connexion à une base mySQL depuis une page ASP.
Rien de compliqué, l'utilisation est comme pour Access, mais c'est vrai que les paramètres ne s'invente pas...
ATTENTION il faut avoir MyODBC sur la machine ou il y a les pages ASP.

Source

  • <%
  • ' Déclaration de mes variables
  • Dim LE_DSN
  • Dim MaConnexion
  • Dim ServerAddress
  • Dim DBName
  • Dim UID
  • Dim Password
  • ' IP ou Nom du serveur mySQL
  • ServerAddress = "localhost" 'localhost si c'est sur la même machine
  • ' Nom de la base de données
  • DBName = "mabase"
  • ' Login pour la base
  • UID = "LeLogin"
  • ' Mot de passe pour la base
  • Password = "LeMotDePasse"
  • ' Ici on construit la chaine de connexion ODBC
  • LE_DSN = "driver={MySql};server=" & ServerAddress & ";db=" & DBName & ";user id=" & UID & ";pwd=" & Password & ";option=16386"
  • ' Paramètre de connexion + connexion
  • Set MaConnexion = Server.CreateObject("ADODB.Connection")
  • MaConnexion.ConnectionTimeout = 30
  • MaConnexion.CommandTimeout = 30
  • MaConnexion.Open LE_DSN
  • ' J'ai tout segmenté pour une question de souplesse mais on peut faire plus court
  • ' sans utiliser les variables et faire la chaine de connexion directement.
  • '
  • ' Pour "option=16386" j'ai mis du temps à trouver car si vous ne mettez pas cela,
  • ' Cela ne fonctionnera pas correctement. Ci dessous la liste des options de connexion
  • ' pour MyODBC (désolé, j'ai pas eu le temps de traduire :) )
  • ' The Option argument is used to tell MyODBC that the client isn't 100% ODBC compliant.
  • ' The following options are listed in the same order as they appear in the MyODBC connect screen:
  • ' 1 The client can't handle that MyODBC returns the real width of a column.
  • ' 2 The client can't handle that MySQL returns the true value of affected rows.
  • ' If this flag is set then MySQL returns 'found rows' instead.
  • ' One must have MySQL 3.21.14 or newer to get this to work.
  • ' 4 Make a debug log in c:\myodbc.log. This is the same as putting MYSQL_DEBUG=d:t:O,c::\myodbc.log in AUTOEXEC.BAT
  • ' 8 Don't set any packet limit for results and parameters.
  • ' 16 Don't prompt for questions even if driver would like to prompt
  • ' 32 Simulate a ODBC 1.0 driver in some context.
  • ' 64 Ignore use of database name in 'database.table.column'. (MySQL 3.22)
  • ' 128 Force use of ODBC manager cursors (experimental)
  • ' 256 Remove use of extended fetch (experimental)
  • ' 512 Pad CHAR fields to full column length.
  • ' 1024 SQLDescribeCol() will return fully qualifed column names
  • ' 2048 Use compressed protocol (if server supports it)
  • ' 4096 Tell server to ignore space after function name and before '(' (needed by PowerBuilder). This will make all function names keywords!
  • ' 8192 Connect with named pipes to a mysqld server running on NT.
  • ' 16384 Change LONGLONG columns to INT columns, as some applications can't handle LONGLONG.
  • ' 32768 Return 'user' as Table_qualifier and Table_owner from SQLTables (test)
  • ' 65536 Read my.cnf
  • ' 131072 Add some extra safety checks (should not bee needed but...)
  • %>
<%
	' Déclaration de mes variables
	Dim LE_DSN
	Dim MaConnexion
	Dim ServerAddress
	Dim DBName
	Dim UID
	Dim Password
	
	' IP ou Nom du serveur mySQL
	ServerAddress = "localhost" 'localhost si c'est sur la même machine
	' Nom de la base de données
	DBName = "mabase"
	' Login pour la base
	UID = "LeLogin"
	' Mot de passe pour la base
	Password = "LeMotDePasse"
	
	' Ici on construit la chaine de connexion ODBC
	LE_DSN = "driver={MySql};server=" & ServerAddress & ";db=" & DBName & ";user id=" & UID & ";pwd=" & Password & ";option=16386"

	' Paramètre de connexion + connexion
	Set MaConnexion = Server.CreateObject("ADODB.Connection")
		MaConnexion.ConnectionTimeout = 30	
		MaConnexion.CommandTimeout = 30
	
		MaConnexion.Open LE_DSN
		
	' J'ai tout segmenté pour une question de souplesse mais on peut faire plus court 
	' sans utiliser les variables et faire la chaine de connexion directement.
	'
	' Pour "option=16386" j'ai mis du temps à trouver car si vous ne mettez pas cela,
	' Cela ne fonctionnera pas correctement. Ci dessous la liste des options de connexion
	' pour MyODBC (désolé, j'ai pas eu le temps de traduire :) )
	
	' The Option argument is used to tell MyODBC that the client isn't 100% ODBC compliant. 
	' The following options are listed in the same order as they appear in the MyODBC connect screen:

	' 1      The client can't handle that MyODBC returns the real width of a column. 
	' 2      The client can't handle that MySQL returns the true value of affected rows.  
	' 	   If this flag is set then MySQL returns 'found rows' instead.
	' 	   One must have MySQL 3.21.14 or newer to get this to work. 
	' 4      Make a debug log in c:\myodbc.log.  This is the same as putting MYSQL_DEBUG=d:t:O,c::\myodbc.log in AUTOEXEC.BAT
	' 8      Don't set any packet limit for results and parameters.
	' 16     Don't prompt for questions even if driver would like to prompt 
	' 32     Simulate a ODBC 1.0 driver in some context.
	' 64     Ignore use of database name in 'database.table.column'. (MySQL 3.22) 
	' 128    Force use of ODBC manager cursors (experimental)
	' 256    Remove use of extended fetch (experimental)
	' 512    Pad CHAR fields to full column length.
	' 1024   SQLDescribeCol() will return fully qualifed column names
	' 2048   Use compressed protocol (if server supports it)
	' 4096   Tell server to ignore space after function name and before '('       (needed by PowerBuilder).  This will make all function names keywords! 
	' 8192   Connect with named pipes to a mysqld server running on NT. 
	' 16384  Change LONGLONG columns to INT columns, as some applications can't       handle LONGLONG.
	' 32768  Return 'user' as Table_qualifier and Table_owner from SQLTables (test) 
	' 65536  Read my.cnf
	' 131072 Add some extra safety checks (should not bee needed but...) 
	
%>
 

 Conclusion

Simple non ? :)
Et croyez moi, ça marche du tonerre !


 Sources du même auteur

Source avec Zip Source avec une capture Source .NET (Dotnet) FAIRE UN PING (ICMP) EN VB 2005 (LE PLUS SIMPLEMENT DU MONDE...
IMPRIMER LE CONTENU D'UN RICHTEXTBOX
Source avec Zip Source avec une capture TESTEUR DE REGEX (REGULAR EXPRESSIONS)
Source avec Zip Source avec une capture FORCER LE REBOOT SOUS WINDOWS NT OU WINDOWS 2000 (REDÉMARRAG...
COMPTER LES MOTS DANS UNE CHAINE DE CARACTÈRE

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) [VB 8][.NET 2]APPELER UN FICHIER DISTANT AVEC LES MÉTHODES P... par FREMYCOMPANY
Source avec Zip RAPIDO par mimiZanzan
Source avec Zip Source avec une capture CRYPTER DES PAGES ASP par Yoyo2B
Source avec Zip DIRECTX TUTO 9 : DIRECTINPUT LA SOURIS .... par ciberrique
Source avec Zip Source avec une capture SSA (SCRIPT SERVEUR ACTIF) COMME ASP POUR VOS SERVEURS HTTP par DeadlyPredator

 Sources en rapport avec celle ci

Source avec Zip TRAVAILLER AVEC MYSQL par grandzebu
Source avec Zip Source avec une capture VB MYQSL par kalalampiana
Source avec Zip LA DLL VBMYSQLDIRECT + LE CODE SOURCE DE LA DLL + EXEMPLES ... par chieur
Source avec Zip TRANSFERT BASE DE DONNÉES MULTI FORMAT par EddiePonpon
Source avec Zip CONNEXION À UNE BASE DE DONNÉES MYSQL VIA ODBC par JeanPoldeux

Commentaires et avis

Commentaire de Mercury le 03/10/2002 17:30:28

Bon, j'effectue actuellement la transition entre mon site ASP+ACCESS vers ASP+MySql. J'ai tout installé, et j'ai recréé mes tables sous Mysql. J'ai installé les drivers ODBC pour MySql. Lors d'une connexion vers ma base MySql, j'ai systèmatiquement l'erreur : "[Microsoft][Gestionnaire de pilotes ODBC] Source de données introuvable et nom de pilote non spécifié].

Pourtant, j'ai bien créé une DSN avec les bonnes infos (j'ai vérifié que tout était OK en cliquant sur "Test Data Source" dans la fenêtre de l'outil d'administration des sources de données ODBC". De plus, j'ai utilisé le code proposé par Nix pour se connecter à une bdd MySql, mais rien n'y fait.

Pour info, ma base porte le nom users_data, et j'utilise ton code dans ma page ASP :

' Déclaration de mes variables
Dim LE_DSN
Dim MaConnexion
Dim ServerAddress
Dim DBName
Dim UID
Dim Password

' IP ou Nom du serveur mySQL
ServerAddress = "localhost" 'localhost si c'est sur la même machine
' Nom de la base de données
DBName = "users_data"
' Login pour la base
UID = "titi"
' Mot de passe pour la base
Password = "toto"


' Ici on construit la chaine de connexion ODBC
LE_DSN = "driver={MySQL};server=" & ServerAddress & ";db=" & DBName & ";user id=" & UID & ";pwd=" & Password & ";option=16386"

' Paramètre de connexion + connexion
Set MaConnexion = Server.CreateObject("ADODB.Connection")
MaConnexion.ConnectionTimeout = 30
MaConnexion.CommandTimeout = 30

MaConnexion.Open LE_DSN


Si t'as une idée, je suis preneur, car là je m'arrache les cheveux :-(

Merci d'avance.

Commentaire de Mercury le 10/12/2002 11:14:17

Merci de ton aide, et surtout de ta réponse !!! (Perso, j'essai d'apporter un suivi aux sources que je poste et j'ai au moins la politesse de répondre.) !

Commentaire de Proutie66 le 19/03/2003 00:58:57

nix c le webmaster du site .
tu crois kil a ke ca a faire ke te repondre ??

Commentaire de nass932 le 21/09/2003 02:52:25

une reponse à Mercury serait le bienvenue car je rencontre exactement le meme probleme !

par avance merci.

Commentaire de nass932 le 21/09/2003 03:39:44

Mercury voila la chaine de connection ODBC qui chez moi,a corrigé notre erreur !

ConnexionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=Ton_Serveur;" & _
"DATABASE=Ta_Base_de_Données;" & _
"USER=Ton_Nom;" & _
"OPTION=96;" & _
"PASSWORD=Ton_Mot_De_Passe;"

Commentaire de Mercury le 30/03/2004 19:33:55

Proutie66 =&gt; Belle mentalité ... No comment ...

nass932 =&gt; Merci pour ta réponse ;) Heureusement qu'il y a des mecs sympas sur ce site.

Commentaire de yoman64 le 26/07/2004 02:51:34

Je crois qu'il y a quelque pb avec tes sources , nix , parce que yen a bcp qui sont en asp mais qui sont sur vbfrance...

Commentaire de zaptaf le 06/08/2006 01:09:08

super nass932!!! Ta ligne fonctionne pour moi, et non celle du départ plus haut. Aussi, quelle est la valeur de cett option? 96?

Moi je débute depuis hier sur mysql avec asp. Je prog depuis plus de 7 ans en asp mais aussi en php depuis peu. Je croyais que ca serait plus complexe. Ouf, enfin! Ca c'est fait en quelques clics.

Toutefois, j'utilise phpMyadmin pour l'interfacage. Y a t-il une autre sorte d'interface pour accéder aux données ainsi? Quoi que je trouve phpmyadmin merveilleux, je me demande si c'est de mise, ou si ca peut affecter quelque chose de travailler en asp mais d'administrer par phpmyadmin?

Je vous le dis tout de suite messieurs, je suis vendu asp, vb et vbscript et non php. Alors si y en comme moi qui sont asp + mysql, faites-le moi savoir, j'aurai besoin de quelque peu de conseils rapides pour ne pas tomber dans des pièges de typage de donnée ou de perte de temps genre.

Merci à l'avance les amis

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Asp+MySQL pb sur serveur distant [ par Geronimo ] Salut,Je cherche un hébergeure gratuit qui supporte ASP+MySQL pour faire des tests car le mien ne sais pas m'aider.Actuellement j'ai le message d'erre MyODBC [ par Abou ] Je n'arrive pas à installer le driver ODBC de MySql... Qui pourrait m'aider ??? J'ai téléchager le driver sous www.MySql.com mais l'installation me pl SE CONNECTER AVEC L'ASP SUR UNE BD MYSQL EN LOCAL ????? [ par Foub12 ] Bonjour !COMMENT FAIRE POUR SE CONNECTER A UNE BASE MYSQL EN LOCAL ???Voilà... J'ai téléchargé le driver MySQl pour OBDC 32 bits..J'ai pris le réperto MySQL & MyODBC [ par ricoux ] Bonjour à tousEn utilisant une base de données MySQL & MyODBC je ne parviens pas à ramasser les valeurs que j'y est entré.Si qqu'un à une soluce... j' MySQL & MyODBC [ par ricoux ] Bonjour,Via MyODBC, j'ai créé une table de type:Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim fld As ADODB.Field Dim sql As String<b pbm ODBC mysql/NT4 [ par linkwang ] Bonjour,j'ai un problème sur mon serveur NT4 quand je tente d'executer un select via odbc,pourtant je fais quelque chose de tres classique,je pose que Accès base MysqL en ODBC par internet en VB [ par leteltel ] salut, j'aimerais remplir une base MySQL par un petit exe VB6 sur un serveur internet distant, j'y arrive bien en odbc en reseau local, mais lorsque j ASP & mySQL [ par JEDI_BC ] Est-il possible de se connecter à une base mySQL via ASP (en utilisant une ADODB.Connction par exemple) et si oui, quelle est la connectstring à utili Utilisation en VB d'ADODB/mysql [ par SyDaze ] Salut, y'aurai moyen ke quelqu'un ecrive dans les grands axes comment se servir d'ADODB sous VB : connection,log,configuration...G pris le code source Probleme d'ecriture dans une base MySQL via ODBC [ par gar6more ] Salut à tous.J'ai réalisé une application qui fonctionne sous access et je veux l'utiliser avec mysql (sans changer trop le code). J'ai fait la connex


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
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 : 1,092 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales