Hoi,
ben bezig om het free guestbook van een kennis van om te bouwen van die guestbook provider naar mijn SQL server, zodat we daar verder kunnen gaan. De reden waarom e.d. is misschien niet belangrijk
Probleem: 269 pagina's. Per pagina staan er 10 berichten. Nu wil ik dus eerst proberen om alle pagina's lokaal op te slaan in html. Daarna kan ik wel een script fiksen om alles in de SQL te stoppen.
Nu dacht ik het op deze manier te doen met de volgende code:
De variable SkipCount komt uit een andere pagina, die die waarde doorgeeft (bijvoorbeeld 10, 20 etc. etc.)
De eerste 2 pagina's gaan goed, maar zodra de 3e pagina gemaakt moet worden, krijg ik de volgende error:
Zoals je ziet is de XML status ok. Maar het gaat dus fout bij de writefile.writeline(strHTML).
Weet iemand wat dit zou kunnen zijn. Want als ik bijvoorbeeld de 4e pagina weer ga doen, dan komt het wel weer goed.
Iemand een idee?
/edit:
de strHTML is dus de complete page. Wat er nu dus gebeurt (waarom het denk ik fout gaat) is dat als er een hele lange regel staat, dan lijkt het wel of ie daarvan over zijn nek gaat.
Iemand die weet hoe ik dat kan oplossen?
ben bezig om het free guestbook van een kennis van om te bouwen van die guestbook provider naar mijn SQL server, zodat we daar verder kunnen gaan. De reden waarom e.d. is misschien niet belangrijk
Probleem: 269 pagina's. Per pagina staan er 10 berichten. Nu wil ik dus eerst proberen om alle pagina's lokaal op te slaan in html. Daarna kan ik wel een script fiksen om alles in de SQL te stoppen.
Nu dacht ik het op deze manier te doen met de volgende code:
ASP:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| <% Dim objXmlHttp Dim strHTML Dim AantalPages Dim SkipCount SkipCount = request("skipcount") ' This is the server safe version from MSXML3. Set objXmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP") objXmlHttp.open "GET", "http://www.domein.nl?skip="&SkipCount&"0", False objXmlHttp.send Response.Write "Status: " & objXmlHttp.status & " "& objXmlHttp.statusText strHTML = objXmlHttp.responseText Server.HTMLEncode(strHTML) ' schrijf de html filename=server.mappath("/wim/page"&SkipCount&".html") Set fs = CreateObject("Scripting.FileSystemObject") Set writefile = fs.OpenTextFile(filename, 2, True) writefile.writeline(strHTML) writefile.Close set writefile=nothing set fs=nothing Set objXmlHttp = Nothing response.redirect "skip.asp?StatReturn="&Statreturn %> |
De variable SkipCount komt uit een andere pagina, die die waarde doorgeeft (bijvoorbeeld 10, 20 etc. etc.)
De eerste 2 pagina's gaan goed, maar zodra de 3e pagina gemaakt moet worden, krijg ik de volgende error:
code:
1
2
3
4
5
6
7
| Status: 200 OK Microsoft VBScript runtime error '800a0005' Invalid procedure call or argument /httpget.asp, line 19 |
Zoals je ziet is de XML status ok. Maar het gaat dus fout bij de writefile.writeline(strHTML).
Weet iemand wat dit zou kunnen zijn. Want als ik bijvoorbeeld de 4e pagina weer ga doen, dan komt het wel weer goed.
Iemand een idee?
/edit:
de strHTML is dus de complete page. Wat er nu dus gebeurt (waarom het denk ik fout gaat) is dat als er een hele lange regel staat, dan lijkt het wel of ie daarvan over zijn nek gaat.
Iemand die weet hoe ik dat kan oplossen?
Heart..pumps blood.Has nothing to do with emotion! Bored