Discussion :

[Tragnee]

Bonjour à tous,

dans un souci de performance, j'ai migré une BD d'Access vers MySQL.

Après la mise à jour du DRIVER ODBC, aucun souci. Cependant, lors d'un insert, je n'arrive pas à récuperer le n° auto généré pour l'enregistrement inséré.

VOici un bout de code pour vous aider :

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
 
Dim connexion, DSN, Req, RSTxt
 
ServerAddress = "localhost" ' Serveur MySQL 
DBName = "norditube_site" ' Nom de la Base de données 
UID = "Norditube" ' Nom d'utilisateur 
Password = "xxxxxx" ' Mot de Passe 
DSN = "driver={MySql ODBC 3.51 Driver};server=" & ServerAddress & ";db=" & DBName & ";user id=" & UID & ";pwd=" & Password & ";option=16386" 
 
Set Connexion = Server.CreateObject("ADODB.Connection") 
Connexion.ConnectionTimeout = 30     
Connexion.CommandTimeo
 
ReqSQL = "SELECT * From Clients"
 
Set RS = Server.CreateObject("ADODB.RecordSet") 
RS.Open ReqSQL, Connexion, 2, 3
 
RS.addnew
 
RS("clisociete") = "Nommmmmmmmm2222"
 
RS.update
 
Reponse.write(RS("clinumauto"))

Le RS("clinumauto") ne me renvoie rien alors que dans la DB, cela a été créé et que sous Access, cela fonctionnait très bien !!!

Quelqu'un a-t'il une idée de solution ??

Pour info, MySQL est la version 4.1.11

Merci,
Mike

[Immobilis]

Et ceci?

Set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "Clients", Connexion, 2, 3

RS.addnew

RS("clisociete") = "Nommmmmmmmm2222"

RS.update

Reponse.write(RS("clinumauto"))

[Tragnee]

Merci de l'idée mais je viens d'essayer et le resultat est toujours le même

[Immobilis]

On dirait que VB script et MySQL ne font pas bon ménage
Comment font-ils du côté MySQL?

[Tragnee]

Du coté MySQL ??

[Immobilis]

Ben oui, MySQL & PHP

dans un souci de performance, j'ai migré une BD d'Access vers MySQL.

Tu voulais dire SQL Server???

[Tragnee]

Non mais j'avais reconnecté avec PHP...

En PHP, une fonction existe pour ça mais impossible de trouver l'équivalent en ASP...

Et sur un SQL Server, cela fonctionnerait ?

[Immobilis]

En tous les cas, chez moi ça marche.

[Tragnee]

Avec quelle DB et quelle version ?

Quel est le driver adapté ?

[Immobilis]

Avec quelle DB et quelle version ?

SQL 2000

Quel est le driver adapté ?

Ben les driver SQL...

[Tragnee]

Est-ce possible de se connecter sans déclarer les connexions dans les sources de données ?

Pourrais-tu me mettre un morceau de code que tu utilises pour te connecter ?

Merci,
Mike

---------------

J'ai trouvé ça, c'est correct ??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Set conn = Server.CreateObject("ADODB.Connection")
' chaine de connexion
connstring = "driver={SQL Server};" & "server=mon_serveur;uid=login; pwd=mot_de_passe;
database=base_en_cours"
' ouverture de la connexion
conn.open connstring
... ' traitement
' fermeture et destruction de la connexion
conn.close
set conn=nothing