détecter une clé primaire sous access [Résolu]

[boss_gama]

salut, je suis en train de faire un script qui automatise un transfert de base de données de access a mysql.
Mon problème intervient au moment d'inserer les champs recupérés sous acces dans mysql.
Je jongle avec les options champ.name champ.type pour déterminer le type d'opérations a éffectué, puis je groupe tous mes champs et je créé mon insert. Mon problème est qu'il agit de la même facon sur les champs qui sont des clé primaires, puis plante dans l'insert.

comment détecter qu'un champ est une clé primaire?

[amar00]

une piste :

Code :

1
2
3
 
'si oConn est l'objet connection qui pointe sur ta base access
set rs = oConn.OpenSchema(adSchemaPrimaryKeys)

pour le reste je te laisse fouiller, c'est pas trop dur....

[boss_gama]

bon j'ai fais un tour sur la msdn, et dapres ce que j'ai compris, je devrais faire un script du style:

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
<%
	Set conn = Server.CreateObject("ADODB.Connection")
	connstring = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath(".") & "\data\db.iol" 
	conn.Open connstring, adOpenDynamic, adLockOptimistic
	Set rst = Server.CreateObject("ADODB.Recordset")
 
 
	set rst = conn.OpenSchema(28)
	do while not rst.eof
			response.write rst("COLUMN_NAME") & " | " & rst("PK_NAME") & "|<br>"
			rst.movenext
	loop
	rst.close
%>

Mais le code ci-dessus ne me donne pas le résultat escompté. Ou est-ce que j'ai fais une erreur?

[amar00]

Dans l'ordre à mon avis ce serait plutôt dans ce goût là

Code :

1
2
3
4
5
6
7
8
9
10
 
Set conn = Server.CreateObject("ADODB.Connection")
connstring = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath(".") & "\data\db.iol" 
conn.Open connstring	
set rst = conn.OpenSchema(28)
do while not rst.eof
	response.write rst("COLUMN_NAME") & " | " & rst("PK_NAME") & "|<br>"
	rst.movenext
loop
rst.close

[boss_gama]

vi c'est cool, comme ca ca marche.
Je te remercie pour ton aide