I creaty dynamicly a Script with Insert Statements. This looks like:
Code: Select all
scrFile.ScriptText &= "Delete From IproHead where manufacturer_code='" & rHead(9).Feldwert & "';"
scrFile.ScriptText &= String.Format("INSERT INTO `voptneu`.`iprohead` (`version`, " & _
"`software_id`, `comment`, `uid_manufacturer`, `uid_postedit`, `valid_from`, " & _
"`valid_until`, `country`, `language`, `manufacturer_code`, `manufacturer_subcode`, " & _
"`manufacturer_name`, `manufacturer_subname`, `manufactuer_name_1`, " & _
"`manufacturer_name_2`, `street`, `zip_code`, `city`, `po_box_zip_code`, " & _
"`po_box_text`, `phone`, `fax`, `phone_order`, `fax_order`, `mail`, `url`, " & _
"`pricedefinition_cylinder`, `cylindergroup_base`, `cylindergroup_1`, " & _
"`cylindergroup_2`, `prismgroup_1`, `prismgroup_2`, `prismgroup_3`, " & _
"`prismgroup_4`, `prismgroup_5`, `currencydescription`, " & _
"`currencydescription_decimals`, `pricefield_01`, `pricefield_02`, `pricefield_03`, " & _
"`pricefield_04`, `pricefield_05`, `pricefield_description_01`, " & _
"`pricefield_description_02`, `pricefield_description_03`, `pricefield_description_04`, " & _
"`pricefield_description_05`, `characterset`) VALUES (" & _
"'{0}', '{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}', '{43}', '{44}', '{45}', '{46}', '{47}';)", _
rHead(0).Feldwert, rHead(1).Feldwert, rHead(2).Feldwert, rHead(3).Feldwert, rHead(4).Feldwert, _
rHead(5).Feldwert, rHead(6).Feldwert, rHead(7).Feldwert, rHead(8).Feldwert, rHead(9).Feldwert, _
rHead(10).Feldwert, rHead(11).Feldwert, rHead(12).Feldwert, rHead(13).Feldwert, rHead(14).Feldwert, _
rHead(15).Feldwert, rHead(16).Feldwert, rHead(17).Feldwert, rHead(18).Feldwert, rHead(19).Feldwert, _
rHead(20).Feldwert, rHead(21).Feldwert, rHead(22).Feldwert, rHead(23).Feldwert, rHead(24).Feldwert, _
rHead(25).Feldwert, rHead(26).Feldwert, rHead(27).Feldwert, rHead(28).Feldwert, rHead(29).Feldwert, _
rHead(30).Feldwert, rHead(31).Feldwert, rHead(32).Feldwert, rHead(33).Feldwert, rHead(34).Feldwert, _
rHead(35).Feldwert, rHead(36).Feldwert, rHead(37).Feldwert, rHead(38).Feldwert, rHead(39).Feldwert, _
rHead(40).Feldwert, rHead(41).Feldwert, rHead(42).Feldwert, rHead(43).Feldwert, rHead(44).Feldwert, _
rHead(45).Feldwert, rHead(46).Feldwert, rHead(47).Feldwert)
But there I get an error. - How to solve this problem? - What di I have to insert, that the Date can be NULL?
The field on the server has Allow Null activated.
THX