HTML-Code einer Seite abrufen

Anfängerfragen zum Programmieren mit PureBasic.
Tombi
Beiträge: 369
Registriert: 05.03.2008 22:05

HTML-Code einer Seite abrufen

Beitrag von Tombi »

Tag zusammen,
bekommt es jemand von euch hin, den Quelltext dieser Seite abzurufen?

Code: Alles auswählen

;- Window Constants
;
Enumeration
  #window
EndEnumeration

If InitNetwork() = 0
  MessageRequester("Error", "InitNetwork() error", 0)
  End
EndIf

;- Gadget Constants
;
Enumeration
  #web
  #list
EndEnumeration



  Procedure WebGadgetBusy()
    ;warten bis fertig geladen
    While GetGadgetAttribute(#web, #PB_Web_Busy)
      While WaitWindowEvent(1): Wend
    Wend
  EndProcedure



If OpenWindow(#window, 380, 100, 786, 503, "http://www.email-verzeichnis.de/ >> Test", #PB_Window_TitleBar )
    If UseGadgetList(WindowID(#window))
      WebGadget(#web, 20, 10, 460, 480, "about:blank")
      ListViewGadget(#list, 490, 10, 280, 480)
      
    Else
      MessageRequester("Error", "UseGadgetList() error", 0)
      End
    EndIf
  EndIf
  
 
  
  Repeat
    event = WaitWindowEvent()
    
    SetGadgetText(#web, "www.email-verzeichnis.de")
    webgadgetbusy()
    MessageRequester("hallo", GetGadgetItemText(#web, #PB_Web_HtmlCode))
    
  Until event = #PB_Event_CloseWindow
Bild Bild Bild
Intel Pentium 4 630 (3 GHZ)
Benutzeravatar
STARGÅTE
Kommando SG1
Beiträge: 7031
Registriert: 01.11.2005 13:34
Wohnort: Glienicke
Kontaktdaten:

Re: HTML-Code einer Seite abrufen

Beitrag von STARGÅTE »

---------------------------
hallo
---------------------------
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="de" lang="de">
<head>
<meta http-equiv="content-type" content="text/html;charset=UTF-8" />
<title>DeTeMedien - eMail-Verzeichnis</title>
<script src="/js/teleauskunftDe.js" type="text/javascript"></script>
<link rel="stylesheet" type="text/css" href="/email_verz/css/styles_2010101801.css" media="all" />
</head>
<body>
<div id="page">
<div id="col_left">
<!-- IVW VERSION="1.5" -->
<script type="text/javascript">
/* <![CDATA[ */
var IVW="http://dastelef.ivwbox.de/cgi-bin/ivw/CP/DTMEMV";
document.write("<img src=\""+IVW+"?r="+escape(document.referrer)+"&d="+(Math.random()*100000)+"\"width=\"1\" height=\"1\" alt=\"\" />");
/* ]]> */
</script>
<noscript>
<img src="http://dastelef.ivwbox.de/cgi-bin/ivw/CP/DTMEMV" width="1" height="1" alt="" />
</noscript>
<!-- /IVW -->
</div>
<div id="col_right"><a href="/email/impressum.html"><img src="/email_verz/picts/dete_log.gif" alt="Impressum" /></a></div>
<div id="col_center">
<div id="head">
<div id="sprachauswahl" ><a href="/indexGB.html" title="english">english</a> | <a href="/indexF.html" title="fran&ccedil;ais">fran&ccedil;ais</a></div>
<div id="kopfzeile">
<table width="570">
<tr>
<td align="left"><a href="/index.html"><img src="/email_verz/picts/email_logo.gif" alt="eMail-Verzeichnis" border="0" /></a></td>
<td align="right" valign="bottom"><a href="http://www.dastelefonbuch.de/" target="_blank"><img src="/email_verz/picts/PartnerVonDasTelefonbuch.gif" alt="Das Telefonbuch" border="0" /></a></td>
</tr>
</table>
</div>
</div>
<div id="content">

<form method="post" action="/email/search.php" accept-charset="UTF-8">
<input type="hidden" name="begin" value="0" />
<table width="570">
<tr>
<td colspan="2">Füllen Sie bitte mindestens eines der drei Felder "Name", "Ort", "PLZ" aus!<br />Bei unklarem Suchwort können Sie das Suchwort mit * (Sternchen) abkürzen.</td>
</tr>
<tr>
<td width="285"><img height="8" width="285" src="/email_verz/picts/spacer.gif" alt="spacer" /></td>
<td></td>
</tr>
<tr>
<td valign="top">Name:<br /><input type="text" size="20" name="name" /></td>
<td valign="top">PLZ:<br /><input type="text" size="20" name="plz" /></td>
</tr>
<tr>
<td colspan="2"><img height="8" width="570" src="/email_verz/picts/spacer.gif" alt="spacer" /></td>
</tr>
<tr>
<td valign="top">Ort:<br /><input type="text" size="20" name="ort" /></td>
<td valign="top">Land:<br />
<select name="land">
<option value="Germany">Germany</option>
<option value="Worldwide" selected="selected">Worldwide</option>
<option value="Afghanistan">Afghanistan</option>
<option value="Albania">Albania</option>
<option value="Algeria">Algeria</option>
<option value="Andorra">Andorra</option>
<option value="Angola">Angola</option>
<option value="Antigua and Barbuda">Antigua and Barbuda</option>
<option value="Argentina">Argentina</option>
<option value="Armenia">Armenia</option>
<option value="Aruba">Aruba</option>
<option value="Australia">Australia</option>
<option value="Austria">Austria</option>
<option value="Azerbaijan">Azerbaijan</option>
<option value="Bahamas">Bahamas</option>
<option value="Bahrain">Bahrain</option>
<option value="Bangladesh">Bangladesh</option>
<option value="Barbados">Barbados</option>
<option value="Belarus">Belarus</option>
<option value="Belgium">Belgium</option>
<option value="Belize">Belize</option>
<option value="Benin">Benin</option>
<option value="Bermuda">Bermuda</option>
<option value="Bhutan">Bhutan</option>
<option value="Bolivia">Bolivia</option>
<option value="Bosnia and Herzegovina">Bosnia and Herzegovina</option>
<option value="Botswana">Botswana</option>
<option value="Brazil">Brazil</option>
<option value="Brunei">Brunei</option>
<option value="Bulgaria">Bulgaria</option>
<option value="Burkina Faso">Burkina Faso</option>
<option value="Burma">Burma</option>
<option value="Burundi">Burundi</option>
<option value="Cambodia">Cambodia</option>
<option value="Cameroon">Cameroon</option>
<option value="Canada">Canada</option>
<option value="Cape Verde">Cape Verde</option>
<option value="Central African Republic">Central African Republic</option>
<option value="Chad">Chad</option>
<option value="Chile">Chile</option>
<option value="China">China</option>
<option value="Colombia">Colombia</option>
<option value="Comoros">Comoros</option>
<option value="Congo">Congo</option>
<option value="Cook Islands">Cook Islands</option>
<option value="Costa Rica">Costa Rica</option>
<option value="Cote d'Ivoire">Cote d'Ivoire</option>
<option value="Croatia">Croatia</option>
<option value="Cuba">Cuba</option>
<option value="Cyprus">Cyprus</option>
<option value="Czech Republic">Czech Republic</option>
<option value="Democratic Republic Congo">Democratic Republic Congo</option>
<option value="Denmark">Denmark</option>
<option value="Djibouti">Djibouti</option>
<option value="Dominican Republic">Dominican Republic</option>
<option value="Dominica">Dominica</option>
<option value="Ecuador">Ecuador</option>
<option value="Egypt">Egypt</option>
<option value="El Salvador">El Salvador</option>
<option value="Equatorial Guinea">Equatorial Guinea</option>
<option value="Eritrea">Eritrea</option>
<option value="Estonia">Estonia</option>
<option value="Ethiopia">Ethiopia</option>
<option value="Fiji">Fiji</option>
<option value="Finland">Finland</option>
<option value="France">France</option>
<option value="Gabon">Gabon</option>
<option value="Gambia">Gambia</option>
<option value="Georgia">Georgia</option>
<option value="Germany">Germany</option>
<option value="Ghana">Ghana</option>
<option value="Greece">Greece</option>
<option value="Grenada">Grenada</option>
<option value="Guatemala">Guatemala</option>
<option value="Guinea-Bissau">Guinea-Bissau</option>
<option value="Guinea">Guinea</option>
<option value="Guyana">Guyana</option>
<option value="Haiti">Haiti</option>
<option value="Holy See">Holy See</option>
<option value="Honduras">Honduras</option>
<option value="Hungary">Hungary</option>
<option value="Iceland">Iceland</option>
<option value="India">India</option>
<option value="Indonesia">Indonesia</option>
<option value="Iran">Iran</option>
<option value="Iraq">Iraq</option>
<option value="Ireland">Ireland</option>
<option value="Israel">Israel</option>
<option value="Italy">Italy</option>
<option value="Jamaica">Jamaica</option>
<option value="Japan">Japan</option>
<option value="Jordan">Jordan</option>
<option value="Kazakstan">Kazakstan</option>
<option value="Kenya">Kenya</option>
<option value="Kiribati">Kiribati</option>
<option value="Korea, North">Korea, North</option>
<option value="Korea, South">Korea, South</option>
<option value="Kuwait">Kuwait</option>
<option value="Kyrgyzstan">Kyrgyzstan</option>
<option value="Laos">Laos</option>
<option value="Latvia">Latvia</option>
<option value="Lebanon">Lebanon</option>
<option value="Lesotho">Lesotho</option>
<option value="Liberia">Liberia</option>
<option value="Libya">Libya</option>
<option value="Liechtenstein">Liechtenstein</option>
<option value="Lithuania">Lithuania</option>
<option value="Luxembourg">Luxembourg</option>
<option value="Macedonia">Macedonia</option>
<option value="Madagascar">Madagascar</option>
<option value="Malawi">Malawi</option>
<option value="Malaysia">Malaysia</option>
<option value="Maldives">Maldives</option>
<option value="Mali">Mali</option>
<option value="Malta">Malta</option>
<option value="Marshall Islands">Marshall Islands</option>
<option value="Mauritania">Mauritania</option>
<option value="Mauritius">Mauritius</option>
<option value="Mexico">Mexico</option>
<option value="Micronesia">Micronesia</option>
<option value="Moldova">Moldova</option>
<option value="Monaco">Monaco</option>
<option value="Mongolia">Mongolia</option>
<option value="Morocco">Morocco</option>
<option value="Mozambique">Mozambique</option>
<option value="Namibia">Namibia</option>
<option value="Nauru">Nauru</option>
<option value="Nepal">Nepal</option>
<option value="Netherlands Antilles">Netherlands Antilles</option>
<option value="Netherlands">Netherlands</option>
<option value="New Zealand">New Zealand</option>
<option value="Nicaragua">Nicaragua</option>
<option value="Niger">Niger</option>
<option value="Nigeria">Nigeria</option>
<option value="Norway">Norway</option>
<option value="Oman">Oman</option>
<option value="Pakistan">Pakistan</option>
<option value="Palau">Palau</option>
<option value="Panama">Panama</option>
<option value="Papua New Guinea">Papua New Guinea</option>
<option value="Paraguay">Paraguay</option>
<option value="Peru">Peru</option>
<option value="Philippines">Philippines</option>
<option value="Poland">Poland</option>
<option value="Portugal">Portugal</option>
<option value="Qatar">Qatar</option>
<option value="Romania">Romania</option>
<option value="Russia">Russia</option>
<option value="Rwanda">Rwanda</option>
<option value="Saint Kitts and Nevis">Saint Kitts and Nevis</option>
<option value="Saint Lucia">Saint Lucia</option>
<option value="Saint Vincent and the Grenadines">Saint Vincent and the Grenadines</option>
<option value="San Marino">San Marino</option>
<option value="Sao Tome and Principe">Sao Tome and Principe</option>
<option value="Saudi Arabia">Saudi Arabia</option>
<option value="Senegal">Senegal</option>
<option value="Seychelles">Seychelles</option>
<option value="Sierra Leone">Sierra Leone</option>
<option value="Singapore">Singapore</option>
<option value="Slovakia">Slovakia</option>
<option value="Slovenia">Slovenia</option>
<option value="Solomon Islands">Solomon Islands</option>
<option value="Somalia">Somalia</option>
<option value="South Africa">South Africa</option>
<option value="Spain">Spain</option>
<option value="Sri Lanka">Sri Lanka</option>
<option value="Sudan">Sudan</option>
<option value="Suriname">Suriname</option>
<option value="Swaziland">Swaziland</option>
<option value="Sweden">Sweden</option>
<option value="Switzerland">Switzerland</option>
<option value="Syria">Syria</option>
<option value="Taiwan">Taiwan</option>
<option value="Tajikistan">Tajikistan</option>
<option value="Tanzania">Tanzania</option>
<option value="Thailand">Thailand</option>
<option value="Togo">Togo</option>
<option value="Tonga">Tonga</option>
<option value="Trinidad and Tobago">Trinidad and Tobago</option>
<option value="Tunisia">Tunisia</option>
<option value="Turkey">Turkey</option>
<option value="Turkmenistan">Turkmenistan</option>
<option value="Tuvalu">Tuvalu</option>
<option value="Uganda">Uganda</option>
<option value="Ukraine">Ukraine</option>
<option value="United Arab Emirates">United Arab Emirates</option>
<option value="United Kingdom">United Kingdom</option>
<option value="United States of America">United States of America</option>
<option value="Uruguay">Uruguay</option>
<option value="Uzbekistan">Uzbekistan</option>
<option value="Vanuatu">Vanuatu</option>
<option value="Venezuela">Venezuela</option>
<option value="Vietnam">Vietnam</option>
<option value="Western Samoa">Western Samoa</option>
<option value="West Sahara">West Sahara</option>
<option value="Yemen">Yemen</option>
<option value="Yugoslavia">Yugoslavia</option>
<option value="Zambia">Zambia</option>
<option value="Zimbabwe">Zimbabwe</option>
</select>
</td>
</tr>
<tr>
<td colspan="2"><img height="8" width="35" src="/email_verz/picts/spacer.gif" alt="spacer" /></td>
</tr>
<tr>
<td colspan="2"><input type="image" name="submit" src="/email_verz/buttons/email_suche_bttn.gif" alt="Suche" /></td>
</tr>
</table>
</form>

</div>

<div id="bottom_nav">
<table width="570">
<tr>
<td width="18"><img src="/email_verz/buttons/pfeil.gif" alt="link" /></td>
<td width="267"><a href="/index.html">Neue</a> Suche</td>
<td width="18"><img src="/email_verz/buttons/pfeil.gif" alt="link" /></td>
<td width="267"><a href="/email/insert.html">Neuer</a> Eintrag</td>
</tr>
<tr>
<td colspan="2"></td>
<td width="18"><img height="17" width="18" src="/email_verz/buttons/pfeil.gif" alt="link" /></td>
<td width="267">Eintrag <a href="/email/edit.html">ändern</a> / <a href="/email/edit.html"> löschen</a></td>
</tr>
</table>
</div>

<div id="bottom_links">
<iframe frameborder="0" src="/email/iframe_nutzung.html"></iframe>
<table>
<tr>
<td><a href="/link-tipps.html">Link-Tipps</a> | </td>
<td><iframe frameborder="0" src="/email/iframe_links.html"></iframe></td>
</tr>
</table>
</div>

</div>
</div>
</body>
</html>


---------------------------
OK
---------------------------
PB 6.01 ― Win 10, 21H2 ― Ryzen 9 3900X, 32 GB ― NVIDIA GeForce RTX 3080 ― Vivaldi 6.0 ― www.unionbytes.de
Aktuelles Projekt: Lizard - Skriptsprache für symbolische Berechnungen und mehr
Benutzeravatar
Bisonte
Beiträge: 2468
Registriert: 01.04.2007 20:18

Re: HTML-Code einer Seite abrufen

Beitrag von Bisonte »

bei mir (Win7 x64) gleiches Ergebnis ...
PureBasic 6.21 (Windows x86/x64) | Windows11 Pro x64 | AsRock B850 Steel Legend Wifi | R7 9800x3D | 64GB RAM | GeForce RTX 5080 | ThermaltakeView 270 TG ARGB | build by vannicom​​
Tombi
Beiträge: 369
Registriert: 05.03.2008 22:05

Re: HTML-Code einer Seite abrufen

Beitrag von Tombi »

Bei mir Win7 x64 bekomme ich jedoch bei der Seite kein Ergebnis. Google.de funktioniert prima den HTML-Code abzurufen..
Woran könnte das liegen? Mit IE8 und FF4 komme ich problemlos auf die Seite.

Edit: Habe es meinen Kollegen geschickt.
Bei einem klappt es auch NICHT, welcher Win7 x64 Bit (genauso wie ich) nutzt.
Der andere hat es in einer VM mit Win7 x64 Bit getestet >> Da ging es !

Woran liegt das? o_O
Bild Bild Bild
Intel Pentium 4 630 (3 GHZ)
Tombi
Beiträge: 369
Registriert: 05.03.2008 22:05

Re: HTML-Code einer Seite abrufen

Beitrag von Tombi »

Auch SetGadgetItemText() in Verbindung mit #PB_WEB_HTMLCODE funktioniert bei mir nicht. Gibt es da Schwierigkeiten bezüglich x64? *grübel*
Bild Bild Bild
Intel Pentium 4 630 (3 GHZ)
Tombi
Beiträge: 369
Registriert: 05.03.2008 22:05

Re: HTML-Code einer Seite abrufen

Beitrag von Tombi »

*push* :bounce:
Bild Bild Bild
Intel Pentium 4 630 (3 GHZ)
Benutzeravatar
Bisonte
Beiträge: 2468
Registriert: 01.04.2007 20:18

Re: HTML-Code einer Seite abrufen

Beitrag von Bisonte »

Wie ist es denn, die Seite erst "zu Fuss" herunterzuladen (per ReceiveHTTP())
und dann ins Webgadget zu streamen ?

Obwohl es wie gesagt bei mir Win7 x64 funktioniert.
PureBasic 6.21 (Windows x86/x64) | Windows11 Pro x64 | AsRock B850 Steel Legend Wifi | R7 9800x3D | 64GB RAM | GeForce RTX 5080 | ThermaltakeView 270 TG ARGB | build by vannicom​​
Antworten