Oprettet tor. d. 11. marts 2010 kl. 08:33:52

wandaxp
wandaxp (17.095 point. Point ude: 30)

udarbejdning af csv fil fejler?

Nogen eksperter som kan se den fejl jeg har lavet i dette script?

*********************** fil.asp *****************************

' Her laves forbindelsen til databasen (Sorteret fra)

<html>
<body>

<%
Dim objFSO, objCountFile  ' object vars for FSO and File
Dim strCountFileName      ' filename of count text file
Dim iCount                ' count variable
Dim bUseImages            ' boolean whether or not to use images
Dim I                    ' standard looping var
Dim database2
Const ForReading = 1, ForWriting = 2, ForAppending = 8


    strSQL2 = "SELECT * FROM Varer WHERE LagerAntal > 0"
    Set database2 = con.Execute(strSQL2)
    'her tæller vi hvor mange felter der er udtrukket i recordsettet
    iFieldCount = database2.fields.Count - 1

   


filespec = Request.ServerVariables("APPL_PHYSICAL_PATH") & "prisliste.txt"
Dim fso, MyFile, InternetPris
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile(filespec, ForAppending)

for i = 0 to iFieldCount

response.write iFieldCount & " i = " & i & " "

IF database2("LagerAntal") > 0 THEN
    MyFile.Write database2("Varenr") & ";"
    MyFile.Write database2("Kategori1") & ";"
END IF
next

MyFile.Close
%>
Der er nu lavet en ny prisfil.

</body>
</html>

****************************** Fil slut ************************

Selvom listen af varer i databasen er flere hundrede så kommer kun dette som resultat for min response.write sætning:

26 i = 0 26 i = 1 26 i = 2 26 i = 3 26 i = 4 26 i = 5 26 i = 6 26 i = 7 26 i = 8 26 i = 9 26 i = 10 26 i = 11 26 i = 12 26 i = 13 26 i = 14 26 i = 15 26 i = 16 26 i = 17 26 i = 18 26 i = 19 26 i = 20 26 i = 21 26 i = 22 26 i = 23 26 i = 24 26 i = 25 26 i = 26 Der er nu lavet en ny prisfil.

Skrevet tor. d. 11. marts 2010 kl. 09:23:19| #1

keysersoze
keysersoze (306.439 point)
www.soze.dk
database2.fields.Count returnerer antallet af kolonner - og du søger formentlig antallet af rækker. Mon ikke du skal have fat i recordcount i stedet http://www.w3schools.com/ (...)

Skrevet tor. d. 11. marts 2010 kl. 11:31:26| #2

wandaxp
wandaxp (17.095 point)
hehe det hjalp mig da på sporet af dette til at lave tælliongen med :

SELECT COUNT (*) FROM Varer WHERE LagerAntal > 0

Men den gemmer det stadig ikke i filen men nu tæller den da korrekt :-)

Har du en ide til hvorfor den så ikke vil gemme det i filen?

Skrevet tor. d. 11. marts 2010 kl. 11:52:48| #3

wandaxp
wandaxp (17.095 point)
Bare giv et svar det var bare at den skulle ud på serevren for at kunne bruge sti definitionen :-)

Skrevet tor. d. 11. marts 2010 kl. 19:10:22| #4


Skriv et indlæg




Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] [img]link til billede[/img]
Web- og emailadresser omdannes automatisk til links

Log ind

   

   

Seneste spørgsmål

Sammenskrivning af 2 SQL linier

Oprettet den 11. februar 2012 kl. 14.44
lund_dk giver 30 point for svar | Giv et svar »

Udskrive mappens navn

Oprettet den 8. februar 2012 kl. 13.32
no_doubt giver 60 point for svar | Giv et svar »

Flere tæller/counter SQL og ASP!

Oprettet den 7. februar 2012 kl. 20.09
denny giver 30 point for svar | Giv et svar »

Seneste guides

Installer win 7
Den gode bruger


   




Tips & Tricks fra PC World

Teaser billede

Her er fem sjove danske websider du skal kende

Trænger dine lattermuskler til en omgang fitness på dansk? Vi viser vej til fem websider fyldt med humor og vanvittig satire.


Anmeldelser fra PC World

Teaser billede

Test: Denne super-tablet er iPads hårdeste konkurrent

Eee Pad Transformer Prime er frygtindgydende med sin quadcore processor og evne til at trylle sig om til bærbar. Apple bør kigge i bagspejlet, for Asus' tablet-pc kommer buldrende - og gør det...


Seneste blogindlæg

Teaser billede

Tvangslukke spørgsmål: Hvad er den bedste løsning?

Hej Vi har mange åbne spørgsmål på Eksperten. Vi ville gerne tvangslukke dem - så et spørgsmål efter f.eks. 6 måneder lukkes. Men der er et par uklarheder som ville være gode at få lidt input til:...


Nyheder fra PC World

Teaser billede

Nu kan du snart hente Windows 8

Den nye offentlige betaversion af Windows 8 er klar i denne måned.


Nyheder fra Computerworld

Teaser billede

Måske snart slut med Androids helt store problem

Android-platformen har længe været plaget af et særligt problem. Men måske er problemet nu ved at være elimineret.


Kurser
Samarbejdspartnere

Udgiver · © 2012 IDG Danmark A/S · Hørkær 18 · 2730 Herlev · Tlf.: 77 300 300 · Fax: 77 300 301 · Brug af personoplysninger