Raden räcker inte..

cn.Execute "INSERT INTO OFW (Aktnr,Forsamling,Skattekontor,Avhamtas_pa " &  _
 ",Relation_anhorig,_Tel_anhorig,Gravnummer,Antal_" & _
 "gaster,f11,Postadress,Person_nr,Dodsda" & _
och så vidare

"&" använder du för att slå ihop alla delsträngarna som du måste dela upp satsen i. "_" använder du i radbrytningarna i din källkod för att markera att raderna egentligen hör ihop och bildar en rad.

Tackar =)

Får inte till det ändå =(

Ska göra om dessa 8 cn.Execute till en men får inte till det jag har försökt hur länge som helst..

hjälp pls..

'10
cn.Execute "INSERT INTO OFW (Aktnr,Forsamling,Typ_av_begravning,Skattekontor,Avhamtas_pa,Relation_anhorig,Tel_anhorig,_Tel_anhorig,Gravnummer,Antal_gaster) VALUES('" + myarray(0) + "','" + myarray(1) + "','" + myarray(2) + "','" + myarray(3) + "','" + myarray(4) + "','" + myarray(5) + "','" + myarray(6) + "','" + myarray(7) + "','" + myarray(8) + "','" + myarray(9) + "');"
'10
cn.Execute "INSERT INTO OFW (f11,Dodes_namn,Gatuadress,Postadress,Person_nr,Dodsdatum,Bestallare,_Gatuadress,_Postadress,Gravagare) VALUES('" + myarray(10) + "','" + myarray(11) + "','" + myarray(12) + "','" + myarray(13) + "','" + myarray(14) + "','" + myarray(15) + "','" + myarray(16) + "','" + myarray(17) + "','" + myarray(18) + "','" + myarray(19) + "');"
'10
cn.Execute "INSERT INTO OFW (Program2,Orgel,Kompsitor,Solo,Psalm,_Psalm,f1,Avsked,_Solo,_Orgel) VALUES('" + myarray(20) + "','" + myarray(21) + "','" + myarray(22) + "','" + myarray(23) + "','" + myarray(24) + "','" + myarray(25) + "','" + myarray(27) + "','" + myarray(26) + "','" + myarray(28) + "','" + myarray(29) + "');"
'10
cn.Execute "INSERT INTO OFW (ovrigt,Kostnader,Paketpris,Radgivare,Bokningar,Kontroller,Forshandl,Utlagg,Expkostn,Summa) VALUES('" + myarray(30) + "','" + myarray(31) + "','" + myarray(32) + "','" + myarray(33) + "','" + myarray(34) + "','" + myarray(35) + "','" + myarray(36) + "','" + myarray(37) + "','" + myarray(38) + "','" + myarray(39) + "');"
'10
cn.Execute "INSERT INTO OFW (Avgar,Rest_tillgodo,Begravning,Begravning_datum_tid,Officiant,Organist,Solist_1,Solist_2,Vardskap,Program) VALUES('" + myarray(40) + "','" + myarray(41) + "','" + myarray(42) + "','" + myarray(44) + "','" + myarray(43) + "','" + myarray(45) + "','" + myarray(46) + "','" + myarray(47) + "','" + myarray(48) + "','" + myarray(49) + "');"
'12
cn.Execute "INSERT INTO OFW (Tillbehor,Minnesstund,Minnesstund_datum_tid,Meny_st,_Vardskap,Telesvar,Gravsattning,Gravsattning_datum_tid,Urnleverans,Procession,Kistbarare,Gravvard) VALUES('" + myarray(50) + "','" + myarray(51) + "','" + myarray(53) + "','" + myarray(52) + "','" + myarray(54) + "','" + myarray(55) + "','" + myarray(56) + "','" + myarray(57) + "','" + myarray(58) + "','" + myarray(59) + "','" + myarray(60) + "','" + myarray(61) + "');"
'10
cn.Execute "INSERT INTO OFW (Persavsked,PersAvsked_datum_tid,Preparering,Kistlaggning,Avskedsvard,Kisttransport,Annonsering,Annonsering_datum,Dodsannons,_Dodsannons) VALUES('" + myarray(62) + "','" + myarray(63) + "','" + myarray(64) + "','" + myarray(65) + "','" + myarray(66) + "','" + myarray(67) + "','" + myarray(68) + "','" + myarray(69) + "','" + myarray(70) + "','" + myarray(71) + "');"
'9
cn.Execute "INSERT INTO OFW (f2,Kistor_Urnor,Kisttillagg,Urntillagg,Utsmyckning,Kistdekor,Blombil,Handblomma,_Tillbehor) VALUES('" + myarray(72) + "','" + myarray(73) + "','" + myarray(74) + "','" + myarray(75) + "','" + myarray(76) + "','" + myarray(77) + "','" + myarray(78) + "','" + myarray(79) + "','" + myarray(80) + "');"

:x

Ska göra om dessa 8 cn.Execute till en men får inte till det jag har försökt hur länge som helst..

Inte konstigt. Jag tipsade dig om att använda "&" för att slå ihop strängdelar, och använda "_" för att slå ihop rader till en rad. Du har använt ingenting av det där. Framförallt "_" (underscore) borde du titta närmare på. Jag har redan exemplifierat hur den används. Ha mellanslag mellan "&" och "_" och strängarna.

Jag ser att du brukar använda "+" för att slå ihop strängar. Sluta med det! Använd "&" istället. Då riskerar du inte att råka addera två tal till varandra av misstag.

Hej,

Vill bara förtydliga det Ulf skriver:

Exempel 1 - Sammanfoga uttryck
"Dennis"
"XL"

"XL" & "Dennis" tolkar VB som "XLDennis"

Exempel 2 - Radbryt
"Läs dagens tips." _
"Det är bra."

Tolkar VB som "Läs dagens tips. Det är bra."

I det första exemplet instrueras VB att sammanfoga stränguttrycken.

I det andra exemplet instrueras VB att fortsätta läsa instruktionen på nästa rad:

Rad 1: Stränguttryck+mellanslag+understrykningtecknet
Rad 2 Stränguttryck+mellanslag+understrykningtecknet
Rad 3 Stränguttryck+mellanslag+understrykningtecknet
Rad 4 Stränguttryck+mellanslag+understrykningtecknet

Pröva lägga in allt i en variabel.

strSQL = "INSERT INTO OFW  (Aktnr,Forsamling,Typ_av_begravning,Skattekontor,Avhamtas_pa,"
strSQL = strSQL & " Relation_anhorig, Tel_anhorig, Tel_anhorig, Gravnummer, Antal_Gaster, "
..
..
..
cn.Execute strSQL