[Optimisation] Insert en masse

bjour,

j'ai besoin de faire un tas d'insert dans une base, et j'aimerais savoir s'il est possible d'optimiser ces inserts qui sont les suivants (a titre d'exemple)

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
41
42
 
 
	'dept
	otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid302&"','302')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'site
		otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid201&"','201')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'dept
		otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid302&"','302')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'otfloor
		otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid203&"','203')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'office
		otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid204&"','204')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'building
	otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid202&"','202')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'service
	otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid303&"','303')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)	
 
	'COmpany
 
	otSqlrelation="INSERT INTO otobjectrelation(oidobject,oidobjecttype,oidobjectrelation,oidobjectrelationtype)"
	otSqlrelation=otSqlrelation & "VALUES('"&idmax&"','603','"&oid301&"','301')"
	set oRecrelation=oP.ogbAdoData.Execute(otSqlrelation)

il y a du code asp au milieu, mais les requêtes sont bien là :)

merci !