Jeg kan godt finde ud af at lave en direkte import, hvor jeg pre-definerer feltnavnene, men hvordan gør jeg, når feltnavnene skal hentes fra den første linie???
Skal virksomheder stå stærkere mod angreb og kunne udvikle sig, skal sikkerhed, drift og forretning tænkes sammen. Det er tanken bag Jysk IT’s ambition om at skabe en “sikker fremtid” for kunderne.
<% set fs = server.createobject(\"Scripting.Filesystemobject\") set f = fs.opentextfile(\"dinfil.txt\")
Felter = Split(f.readline,\";\")
For i = 0 To UBound(Data) Data = Split(f.readline,\";\") Conn.Execute(\"INSERT INTO tabel(felt1,felt2,felt5,felt6) VALUES(\'\"& Data(0) &\"\',\'\"& Data(1) &\"\',\'\"& Data(2) &\"\',\'\"& Data(3) &\"\')\") Next %>
ups... det skal lige sige det ikke er testet, men prøv det her
<% set fs = server.createobject(\"Scripting.Filesystemobject\") set f = fs.opentextfile(\"dinfil.txt\")
Felter = Split(f.readline,\";\")
Do While Not f.AtEndOfStream Data = Split(f.readline,\";\") Conn.Execute(\"INSERT INTO tabel(felt1,felt2,felt5,felt6) VALUES(\'\"& Data(0) &\"\',\'\"& Data(1) &\"\',\'\"& Data(2) &\"\',\'\"& Data(3) &\"\')\") Loop %>
<% set fs = server.createobject(\"Scripting.Filesystemobject\") set f = fs.opentextfile(Server.Mappath(\"dinfil.txt\"),1)
Felter = Split(f.readline,\";\")
For i = 0 To UBound(Data) Data = Split(f.readline,\";\") Conn.Execute(\"INSERT INTO tabel(felt1,felt2,felt5,felt6) VALUES(\'\"& Data(0) &\"\',\'\"& Data(1) &\"\',\'\"& Data(2) &\"\',\'\"& Data(3) &\"\')\") Next %>
<% set fs = server.createobject(\"Scripting.Filesystemobject\") set f = fs.opentextfile(Server.Mappath(\"dinfil.txt\"),1)
Felter = Split(f.readline,\";\")
Do While Not f.AtEndOfStream Data = Split(f.readline,\";\") Conn.Execute(\"INSERT INTO tabel(felt1,felt2,felt5,felt6) VALUES(\'\"& Data(0) &\"\',\'\"& Data(1) &\"\',\'\"& Data(2) &\"\',\'\"& Data(3) &\"\')\") Loop %>
Tak for indsatsen... Jeg havde vist stillet spørgsmålet lidt for vagt, for det det handlede om, var også at antallet af felter var varierende - og scriptet vidste ikke på forhånd, hvilke og hvor mange felter, der skulle opdateres...
Jeg har selv løst problemet nu med et sindrigt script, men du skal få pointene som tak for din indsats... :-)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
