On 30 Jan 2007 11:29:32 -0800, "Lars" <lkj002@hotmail.com> wrote:
>Jo, det er en CSV-fil tror jeg den hedder og skal indlæses
>en gang hver måned... Der bliver div. navne opdateret.
>
>Og jo, jeg kunne godt smide det over i databasen manuelt
>Men ideen var, at folk (eller ham der sidder med den nyeste fil)
>der bruger min hjemmeside og ikke
>er så "stive" i konvatering bare skulle kunne fortælle hvor filen
>ligger... En form for upload og så var det min ide, at asp koden
>læser filen og ligger div. navne ind i databasen...
>
>Og ja, det er 2 dim...
>For den skal læse hver linie, finde div. navne og hoppe til næste
>linie.
>
>Men jeg aner ikke hvordan jeg skal gribe det an... ???
Hvis vi tager udgangspunkt i:
arbejder 1 ; arbejder 2 ; arbejder 3
jan hansen ; peter jørgensen ; ole olsen
kurt andersen ; peter hansen ; karl nielsen
Så skal du først have åbnet filen og indlæst indholdet i en variabel.
Til det formål kan du bruge FSO - File System Object - se fx:
<url:
http://www.html.dk/tutorials/asp/lektion15.asp>
Du kan selv vælge hvilket tegn du vil bruge til at markere linieskift.
Jeg har valgt ":".
Hvis vi så har
- gemt indholdet i en variabel: strFil
- har åbnet et Connection-objekt, som hedder objConn
arrEntry = Split(strFil, ":")
' Vi springer over første linie, som blot indeholder feltnavne.
For x = 1 To UBound(arrEntry)
strSql = fktGetSql(arrEntry(x))
objConn.Execute(strSql)
Next
Function fktGetSql(varString)
' Funtionen opbygger en SQL-streng for hver linie
Dim a, varArrString, varStrSql
' Split den enkelte linie
varArrString = Split(varString, " ; ")
varStrSql = "INSERT INTO tabelnavn" & _
" (arbejder1, arbejder2, arbejder3) VALUES ("
For a = 0 To 2
If a > 0 Then
varStrSql = varStrSql & ", "
End If
varStrSql = varStrSql & "'" & varArrString(a) & "'"
Next
varStrSql = varStrSql & ");"
fktGetSql = varStrSql
End Function
Ovenstående er ikke testet, men det kan måske give dig en idé om en
mulig løsning.
Der er ikke taget højde for, at der evt. kan være tomme felter eller
andre fejl i filen.
Håber det kan bringe dig lidt videre.
PS: Gider du tage et kig på:
<url:
http://www.usenet.dk/netikette/citatteknik.html>
--
Jørn Andersen,
Brønshøj