Avatar billede cesil Nybegynder
14. marts 2003 - 09:40 Der er 18 kommentarer og
1 løsning

kommasepareret liste der dør

Jeg har den her side der danner en kommasepareret liste. Det virker som det skal når antal linier i listen holder sig under ca 250.
Hvis linier der skal skrives i filen kommer for højt op sker der bare ingenting.
Hvad gør jeg galt.

<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DSN=dsn;UID=user;PWD=pass"
Set oRs = oConn.Execute(Session("SQLPrint"))
Response.AddHeader "Content-Disposition","attachment;filename=tabel.txt"
Response.Write "MainContact"&vbTAB&"Name"&vbTAB&"Address"&vbTAB&"Zip"&vbTAB&"City" & vbCRLF

Do While Not oRs.EOF
  Name = oRs("Name")
  Address = oRs("Address")
  Zip = oRs("Zip")
  City = oRs("City")
  MainContact = oRs("MainContact")
  Response.Write MainContact&vbTAB&Name&vbTAB&Address&vbTAB&Zip&vbTAB&City&vbCRLF
  oRs.MoveNext
Loop
Response.Flush
Response.End
oRs.Close
Set oRs = Nothing
oConn.Close
Set oConn = Nothing
%>
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 09:44 #1
timelimit ? Prøv at fjerne din

Response.AddHeader "Content-Disposition","attachment;filename=tabel.txt"

for at se om du får en besked
Avatar billede cesil Nybegynder
14. marts 2003 - 09:50 #2
Så får jeg bare alle navnene skrevet på skærmen.
Kan det have noget at gøre med at der kun kan være et vist antal tegn i headeren?
Avatar billede jpvj Nybegynder
14. marts 2003 - 09:51 #3
Jeg ved ikke om det kan være et buffer problem. Kan man ikke flushe hvor hver x linier i dit loop?
Eks

int x=0
do while not ...

x=x+1
if x=10 then
  x=0
  Response.Flush
endif
loop
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 09:55 #4
Ja, du får navnene på skærmen, men du kan udskrive over 250 uden
at få fejl?
Avatar billede cesil Nybegynder
14. marts 2003 - 10:05 #5
erikjacobsen -> ja jeg udskrev lige 600 linier

jpvj -> det virkede ikke.
Den nåede så langt som til jeg fik mulighed for at gemme eller åbne. Jeg prøvede at gemme og så døde den igen. inden den døde, var der i et splitsekund en meddelse jeg ikke kunne nå at læse.
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 10:12 #6
Jeg tror du skal finde forklaringen i den meddelelse ... :)
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 10:12 #7
Har du et link så vi kan prøve?
Avatar billede cesil Nybegynder
14. marts 2003 - 10:22 #8
øjeblik så laver jeg lige en testside
Avatar billede cesil Nybegynder
14. marts 2003 - 10:33 #9
http://212.242.79.34/Netsite2001/GB/CRM/fch2.asp

Siden ser således ud:

<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DSN=dsn;UID=user;PWD=pass"
Set oRs = oConn.Execute("SELECT CRMStatus.Name AS Status, CRMCustomers.ID, CRMCustomers.Name, CRMCustomers.Phone, CRMCustomers.Address, CRMCustomers.Zip, CRMCustomers.City, CRMCustomers.Country, CRMCustomers.StateProv, CRMCustomers.MainContact, CRMCustomers.Email, CRMCustomers.URI, CRMCustomers.Note FROM CRMCustomers INNER JOIN CRMStatus ON CRMCustomers.StatusID = CRMStatus.ID WHERE CRMCustomers.RootID = '5' And CRMCustomers.Account LIKE '%%' And CRMCustomers.Name LIKE '%%' And CRMCustomers.zip LIKE '%%' And CRMCustomers.Phone LIKE '%%' And CRMCustomers.city LIKE '%%' And CRMCustomers.maincontact LIKE '%%' And CRMCustomers.Uri LIKE '%%' And CRMCustomers.email LIKE '%%' Order by zip")

'Set oRs = oConn.Execute(Session("SQLPrint"))

Response.AddHeader "Content-Disposition","attachment;filename=tabel.txt"
Response.Write "MainContact"&vbTAB&"Name"&vbTAB&"Address"&vbTAB&"Zip"&vbTAB&"City" & vbCRLF

x=0
Do While Not oRs.EOF
    x=x+1
  Name = oRs("Name")
  Address = oRs("Address")
  Zip = oRs("Zip")
  City = oRs("City")
  MainContact = oRs("MainContact")
  Response.Write MainContact&vbTAB&Name&vbTAB&Address&vbTAB&Zip&vbTAB&City&vbCRLF
  oRs.MoveNext
      if x=10 then
          x=0
          Response.Flush
    end if
Loop
'Response.Flush
Response.End
oRs.Close
Set oRs = Nothing
oConn.Close
Set oConn = Nothing
%>
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 10:38 #10
Den stopper ved
... NL-5902 RC Venlo
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 10:40 #11
Og der er vist 638
Avatar billede cesil Nybegynder
14. marts 2003 - 10:44 #12
det lyder sansynligt.
Jeg er rimelig sikker på at det ikke har noget med indholdet eller serveren at gøre. Det er afprøvet på forskellige servere med forskelligt indhold.
Avatar billede cesil Nybegynder
14. marts 2003 - 11:08 #13
Nu fik jeg fremprovokeret en fejlmeddelelse jeg håber der kan bruges til noget.

Internet Explorer kan ikke indlæse tabel.txt fra 212.242.79.34.
Forbindelsen til webssidens server blev afbrudt.
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 11:10 #14
Hmm - hvad med at sætte

  response.buffer=false

og droppe din flush. Jeg får den fint her, selv om min
browser ikke forstår din header.
Avatar billede cesil Nybegynder
14. marts 2003 - 11:17 #15
tja, lidt videre kom den da.
nu får jeg en ny fejlmeddelelse

Internet Explorer kan ikke indlæse fch2.asp fra 212.242.79.34
Internet Explorer kunne ikke åbne dette Internetsted. Det anmodede sted er enten ikke tilgængelig eller kan ikke findes. Prøv igen senere.

Det er sgu da mærkeligt at du kan downloade listen når jeg ikke kan...
Avatar billede erikjacobsen Ekspert
14. marts 2003 - 11:22 #16
Ja, mystisk - men jeg ved ikke om jeg kan gøre mere for dig ;)
Avatar billede cesil Nybegynder
14. marts 2003 - 11:29 #17
Okay, men tak for hjælpen ihvertfald
Avatar billede jpvj Nybegynder
14. marts 2003 - 18:02 #18
Bare lige for at (prøve) at forstå det korrekt: Du vil genere en .txt fil, som bliver åbnet med brugerens browser?

Hvis ovenstående er korrekt:
Hvor stor er filen? Hvor lang tid tager det at generere den?

JP
Avatar billede cesil Nybegynder
19. marts 2003 - 12:33 #19
Jeg lukker den her. Jeg lavede det på en anden måde.
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB