Import af data fra txt file til access database

Her er den første del af vejen:

  strText = \' din tekststreng

temp1 = Instr(strText,\";\")
temp2 = mid(strText, 1, temp1-1)
temp2 = mid(strText, temp1+1, len(strText))

- og så fremdeles...denne skal blot sættes ind i en løkke - skal dataene ind i forskellige tabeller, så husk at indregne hvor mange parametre, du har (går jeg ud fra...) og du tømmer langsomt, men sikkert den kommaseparerede string...

- mht. at placere data i db, ja-  så skal det sikkert ske i løkken - beats me!

for nemt, !!!!

der skal mere \"kød\" på  gnu

- jeg har også selv kommenteret mit indlæg...

Det betyder nemlig, at jeg skal ikke hente points - men kun forsøger at være hjælpsom uden at skulle tjene på det...

- i øvrigt modsat Clinton!

Hvordan skal data fra fil indsættes?

Sådan...?

fil:
nisse,hamster,fugtigble
tal_1,tal_2,tal_3

til db:
nisse
hamster
fugtigble
tal_1
tal_2
tal_3

?

ellers læs hele filen ind i et array først evt. - burde vist nok øge hastigheden lidt :-)

til horsmark

en linie i fil = en record i database

<% Dim fso, f, ts, txtFile
  Const ForReading = 1, ForWriting = 2, ForAppending = 8
  Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  Set f = fso.GetFile(\"../minfil.txt\")
  Set ts = f.OpenAsTextStream(ForReading, TristateUseDefault)

  Do
  txtFile = ts.Readline
 
*kode der formatere aktuel linie i fil*
*kode der indsætter linie til record i db´en*

  Loop While Not ts.AtEndOfStream
  ts.Close
%>

Måske noget alá dette ?