1
2
3
4
5
6
7
8
9
10
my @tmparr = ("\'ELEMTYP103\'",
-16575047,
1,
10288,
"\'mitR\'",
"\'2041 2042 2043\'",
"\'\'",
"\'123 2354 2041\'",
"\'1 2 3 4 5 6 7\'"
,777,);
1
2
3
4
my $query = "INSERT INTO ElemTyp(sektion,c_id,klasse,id,name,kommandos,KommandoSortierung,@DLGKommandoSortierung,attribute,dialogid)
VALUES($sektion,$c_id,$klasse,$id,$name,@kommandos,@KommandoSortierung,@DLGKommandoSortierung,@attribute,$dialogid)";
!$db->Sql($query) or die "couldn't do $query because ", $db->Error(), "\n";
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
my $prf = "\'";
my $suf = "\'";
$temp=getParameterName($xline);
$elt_sektion = $prf.$1.$suf;
switch ($temp)
{
case "C_ID" {$elt_cid = getParameterValueNOLF($xline)}
case "klasse" {$elt_klasse = getParameterValueNOLF($xline)}
case "id" {$elt_id= getParameterValueNOLF($xline)}
case "Name" {$elt_name= $prf.getParameterValueNOLF($xline).$suf}
case "kommandos" {$elt_kdos= $prf.getParameterValueNOLF($xline).$suf}
case "KommandoSortierung" {$elt_kdossort= $prf.getParameterValueNOLF($xline).$suf}
case "attribute" {$elt_attr= $prf.getParameterValueNOLF($xline).$suf}
case "dialogId" {$elt_dlgid= getParameterValueNOLF($xline)}
}
...
push @elt_list,[$elt_sektion,$elt_cid,$elt_klasse,
$elt_id,$elt_name,$elt_kdos,$elt_kdossort,
$elt_attr,$elt_dlgid];
1
2
couldn't do INSERT INTO ElemTyp(sektion,c_id,klasse,id,name,kommandos,KommandoSortierung,DLGKommandoSortierung,attribute,dialogid)
VALUES('ELEMTYP0',-16628015,1,207,'abschnitt','2071 2072 2073 2074 ','','2071 2072 2073 2074 2075 ',777,) because -3502[Microsoft][ODBC Microsoft Access Driver] Syntaxfehler in der INSERT INTO-Anweisung.10
2013-10-21T09:17:56 vitekCode: (dl )1
2couldn't do INSERT INTO ElemTyp(sektion,c_id,klasse,id,name,kommandos,KommandoSortierung,DLGKommandoSortierung,attribute,dialogid)
VALUES('ELEMTYP0',-16628015,1,207,'abschnitt','2071 2072 2073 2074 ','','2071 2072 2073 2074 2075 ',777,) because -3502[Microsoft][ODBC Microsoft Access Driver] Syntaxfehler in der INSERT INTO-Anweisung.10