Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 09:00 Der er 10 kommentarer og
2 løsninger

'Vis kilde' kode

Hey..
Jeg har søgt lidt efter en "vis kilde" kode altså en kode hvor man kan skrive internet adressen på en side (Eks. microsoft.com) også viser den ALT html på den indtastede adresse.

Det har jeg så fundet denne kode til:

<html><head><title>AspHTTP Demo Script</title></head><body>
<h2>AspHTTP Demo Script</h2>
<%
  Set HttpObj = Server.CreateObject("AspHTTP.Conn")
  HttpObj.Url = "  http://www.microsoft.com" 
  HttpObj.FollowRedirects = True
  HttpObj.RequestMethod = "GET"
  HttpObj.UserAgent = "Mozilla/2.0 (compatible; MSIE 3.0B; Windows NT)"
  strResult = HttpObj.GetURL
  Response.Write "<b>URL is now:</b><br>" & HttpObj.URL & "<br><br>"
  Response.Write "<b>Headers:</b><br><pre>" & HttpObj.Headers & "</pre><br>"
  Response.Write "<b>The Result is:</b>"
  Response.Write "<form><textarea cols=70 rows=20>"&strResult&"</textarea></form>"
  Set HttpObj = nothing
%>
</body></html>


Problemet er bar´at det er aspHTTP og eftersom det ikke er et af de installerede komponenter ved mit webhotel kan jeg ikke lave det - Det jeg faktisk lidt ked af.

Så nu lyder mit spørgsmål: Er der andre måder end aspHTTP man kan lave en "Vis kilde" kode på?


På forhånd tak.
Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 09:32 #1
Det lyder ik´til der er meget hjælp og hente hos 'Eksperten'? Eller det ka´selvfølgelig os ske det fordi klokken den er halv ti :)
Avatar billede busschou Praktikant
02. oktober 2005 - 09:41 #2
det er tidligt søndag morgen ja, og nørderne sover ;o)
Den nemmeste løsning er i sin browser at klikke på "viskilde"
Hvis den af sjove grunde ikke er tilgængelig kan man altid via javascript skrive noget ala
java script:(alert(document.body.innerHTML));
i adresse linjen
og ellers så kan du i asp kode det med en xml parser som du kan læse om på w3schools.com
Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 09:49 #3
Jeg havde tænkt mig og gøre det sådan at man kunne indtaste adressen i en form boks også skrev den det selv ligesom på http://viskilde.frac.dk (Hvis i prøver den adresse og i skal prøve og skrive en adresse i form feltet så HUSK at skrive http://www foran adressen.) den er bare udviklet i PHP.

Så det derfor jeg skal bruge en sådan kode ellers er det korrekt at man bare kunne trykke "Vis kilde" ;)
Avatar billede driis Nybegynder
02. oktober 2005 - 10:56 #4
Dit webhotel's server har måske WinHttp installeret. Med det kan du gøre cirka det samme som AspHttp eksemplet du selv har skrevet.
Avatar billede driis Nybegynder
02. oktober 2005 - 10:57 #5
Avatar billede Slettet bruger
02. oktober 2005 - 11:07 #6
Du kan ganske sikkert bruge XMLHTTPRequest (Vil med stor sikkerhed være tilgængelig på et web-hotel). Da det ikker er XML skal du bare bruge responseText istedt for responseXML.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/xmlsdk/html/a14023a4-dc35-434d-921b-75714e5a2ddc.asp
Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 16:57 #7
Ja men nu fik jeg fikset denne kode:

<%
Option Explicit
Dim whttp,strUrl

strUrl = ""

Set whttp = Server.CreateObject("WinHttp.WinHttpRequest.5.1")
whttp.Open "GET",strUrl
whttp.Send

Response.BinaryWrite whttp.ResponseBody
Response.End
%>

Hva´ska´jeg så gøre for at den 'viser kilden'?
Hvis man skriver eks. http://www.hjemmeskoen.dk oppe i "strURL" så viser den http://www.hjemmeskoen.dk - Burde det så ikke være muligt og lave en 'vis kilde' der?

Eller hvad skal jeg gøre? :)
Avatar billede driis Nybegynder
02. oktober 2005 - 17:14 #8
Response.Write Server.HTMLEncode(whttp.ResponseText)

Er det det du leder efter ?
Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 18:20 #9
Ja det var det jeg ledte efter :)
Men nu tillader jeg mig at være lidt besværlig ;)..

Lige nu udskriver den koden sådan:
www.hjemmeskoen.dk/Test.asp

Ville det være muligt at udskrive koden som den er skrevet op?
Altså med linie skift osv.?
Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 18:22 #10
Avatar billede driis Nybegynder
02. oktober 2005 - 19:30 #11
Ja, bare smid outputtet ind i en <pre> sektion, så får du formatering med, ie:
Response.Write "<pre>" & Server.HTMLEncode(whttp.ResponseText) & "</pre>"
Avatar billede hjemmeskoen Nybegynder
02. oktober 2005 - 20:00 #12
Fedt så virker lortet..
Driis og kryptos i får lige jeres points som tak for hjælpen :)
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