Problème d'insertion avec MySQL
Bonjour,
voilà, moi mon problème est qu'a l'aide d'une page ASP je copie les données provenant d'une DB Access vers une DB MySQL or
tout mes champs se copie à l'exception des champs Text.
Dans la DB Access j'ai un champs text de 255
Et dans MySQL j'ai un champ Char 255
Mais on dirait qu'il ne veut pas prendre mes données.
Quelqu'un aurait une idée du pourquoi svp !
voici mon code:
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
40
|
'Connexion au serveur Accès
set cnAc = server.CreateObject ("ADODB.Connection")
'Connexion au serveur MySQL
set cnMy = server.CreateObject ("ADODB.Connection")
cnAc.Open "DSN=pokerprofiles_db" DB Access
cnMy.Open "DSN=toto" DB MySql
set rs = server.CreateObject("ADODB.Recordset")
set rs2 = server.CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM TBLplayPS WHERE Numero BETWEEN 0 AND 500 ORDER BY Numero ASC",cnAc,0,1
do while not rs.EOF
rs2.Open "SELECT * FROM TBLplayPS_PROF WHERE Numero = 0",cnMy,2,2
rs2.AddNew
rs2("screen")= rs("screen_name")
rs2("PFR") = Cdbl(rs("PFR"))
rs2("SFALL")= Cdbl(rs("SFALL"))
rs2("SHD")=Cdbl(rs("SHD"))
rs2.Update
rs2.Close
rs.MoveNext
loop
rs.Close
set rs = nothing
set rs2 = nothing
cnAc.Close
cnMy.Close
set cnAc = nothing
set cnMy = nothing |
