Thread View: be.comp.programming
2 messages
2 total messages
Started by Tom Vervoort
Tue, 13 Jan 2004 14:32
Klein ASP probleempje
Author: Tom Vervoort
Date: Tue, 13 Jan 2004 14:32
Date: Tue, 13 Jan 2004 14:32
97 lines
4811 bytes
4811 bytes
This is a multi-part message in MIME format.
------=_NextPart_000_0056_01C3D9EA.81BAE630
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Hoi,
ik heb een asp scriptje geschreven waarmee ik een bepaalde webpagina op =
een externe server wil gaan inlezen. De bedoeling is later nog test =
clausules toe te voegen om slechts een bepaald deel van die pagina weer =
te geven, maar dat is dus voor later... Voorlopig kamp ik echter met een =
error. Weet iemand misschien wat er fout is aan dit script ?
<%
Set FileObject =3D Server.CreateObject("Scripting.FileSystemObject")
Set File =3D =
FileObject.OpenTextFile("http://www.gva.be/nieuws/politiek/default.asp", =
1, False, 0)
Do While not File.AtEndOfStream
Response.write(file.ReadLine)
Loop
file.Close( )
Set FileObject =3D nothing
Set File =3D nothing
%>
Alvast bedankt !!!
Mvg,
Tom V.
------=_NextPart_000_0056_01C3D9EA.81BAE630
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2800.1276" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Hoi,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>ik heb een asp scriptje geschreven =
waarmee ik een=20
bepaalde webpagina op een externe server wil gaan inlezen. De bedoeling =
is later=20
nog test clausules toe te voegen om slechts een bepaald deel van die =
pagina weer=20
te geven, maar dat is dus voor later... Voorlopig kamp ik echter met een =
error.=20
Weet iemand misschien wat er fout is aan dit script ?</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2><%</FONT></DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2>Set FileObject =3D=20
Server.CreateObject("Scripting.FileSystemObject")<BR>Set File =3D=20
FileObject.OpenTextFile("</FONT><A=20
href=3D"http://www.gva.be/nieuws/politiek/default.asp"><FONT =
face=3DArial=20
color=3D#ff0000=20
size=3D2>http://www.gva.be/nieuws/politiek/default.asp</FONT></A><FONT =
face=3DArial=20
color=3D#ff0000 size=3D2>", 1, False, 0)</FONT></DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2>Do While not=20
File.AtEndOfStream<BR> =
Response.write(file.ReadLine)<BR>Loop</FONT></DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2>file.Close( =
)</FONT></DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2>Set FileObject =3D =
nothing<BR>Set File=20
=3D nothing</FONT></DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial color=3D#ff0000 size=3D2>%></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Alvast bedankt !!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Mvg,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Tom V.</FONT></DIV></BODY></HTML>
------=_NextPart_000_0056_01C3D9EA.81BAE630--
Re: Klein ASP probleempje
Author: Mathias Vissers
Date: Tue, 13 Jan 2004 19:51
Date: Tue, 13 Jan 2004 19:51
42 lines
2105 bytes
2105 bytes
"Tom Vervoort" <vervoort.tom@pandora.be> schreef in bericht
news:rkTMb.10061$1I5.3507328@phobos.telenet-ops.be...
Hoi,
ik heb een asp scriptje geschreven waarmee ik een bepaalde webpagina op een
externe server wil gaan inlezen. De bedoeling is later nog test clausules
toe te voegen om slechts een bepaald deel van die pagina weer te geven, maar
dat is dus voor later... Voorlopig kamp ik echter met een error. Weet iemand
misschien wat er fout is aan dit script ?
<%
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set File =
FileObject.OpenTextFile("http://www.gva.be/nieuws/politiek/default.asp", 1,
False, 0)
Do While not File.AtEndOfStream
Response.write(file.ReadLine)
Loop
file.Close( )
Set FileObject = nothing
Set File = nothing
%>
Alvast bedankt !!!
Mvg,
Tom V.
-------------
Naar mijn weten kan je geen externe site's inlezen op deze manier. Kan enkel
gebruikt worden om lokale tekstbestanden (op de server dus) te openen.
Succes!
M.
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads