Autor Thema: GetDocumentByURL Problem  (Gelesen 1883 mal)

Offline andrew22

  • Aktives Mitglied
  • ***
  • Beiträge: 126
  • Ich liebe dieses Forum!
GetDocumentByURL Problem
« am: 20.06.05 - 17:06:41 »
hi ho

also ich habe alles eingerichtet was man braucht um Funktion "GetDocumentByURL" benutzen zu können.

Warum liest mir die Funktion nur einen winzigen teil der HTML Anfrage aus ?!

ich versteh das nicht :( ?!

Marinero Atlántico

  • Gast
Re: GetDocumentByURL Problem
« Antwort #1 am: 20.06.05 - 17:12:01 »
Es wäre hilfreich, wenn du den entsprechenden Codes postet.
Manche Webseiten funktionieren so, dass der ByteStream der Seite der vom ServerSocket an das ClientSocket häppchenweise gesendet wird, so dass - bei großen Seiten - schon ein Teil im Browser des Users ankommt.
Sollte GetDocumentByUrl damit nicht zurechtkommen, fände ich das ziemlich übel  >:(

Offline andrew22

  • Aktives Mitglied
  • ***
  • Beiträge: 126
  • Ich liebe dieses Forum!
Re: GetDocumentByURL Problem
« Antwort #2 am: 20.06.05 - 17:44:52 »
Der Code ist eigentlich janz kleen ;) :

Code

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument

Set session = New NotesSession
Set db = session.CurrentDatabase
Set doc = db.GetDocumentByURL("http://testserver/cgi-bin/test.cgi?bla=1&blub=2")

Print "Body : "+doc.GetItemValue("Body")(0)


Der Agent wird aus einer Datenbank gestartet. Das alles soll bzw. läuft auf dem Server ab so das User nichts wirklich mitbekommt ;).

was mich eben wundert ist das ich nur ganz ganz ganz wenig angezeigt bekomme :(

Offline m3

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.102
  • Geschlecht: Männlich
  • Non ex transverso sed deorsum!
    • leyrers online pamphlet
Re: GetDocumentByURL Problem
« Antwort #3 am: 20.06.05 - 18:16:08 »
Na da würde ich doch mal den HTTP-Status abfragen, ob der Server überhaupt alles zurückliefert:
Code
	Dim workspace As New NotesUIWorkspace
	Dim uidoc As NotesUIDocument
	Dim session As New NotesSession
	Dim webDB As NotesDatabase
	Dim html As NotesDocument

	Set webDB = session.getDatabase("","perweb.nsf")
	Set html = webDB.GetDocumentByURL("http://www.leyrer.priv.at/martin/")
	
	If( html.HTTPStatus(0) <> "200" ) Then
		' Fehler vom Server zureuckbekommen
	Else
		' Alles OK! Weitermachen!
	End If
HTH
m³ aka. Martin -- leyrers online pamphlet | LEYON - All things Lotus (IBM Collaborations Solutions)

All programs evolve until they can send email.
Except Microsoft Exchange.
    - Memorable Quotes from Alt.Sysadmin.Recovery

"Lotus Notes ist wie ein Badezimmer, geht ohne Kacheln, aber nicht so gut." -- Peter Klett

"If there isn't at least a handful of solutions for any given problem, it isn't IBM"™ - @notessensai

Marinero Atlántico

  • Gast
Re: GetDocumentByURL Problem
« Antwort #4 am: 20.06.05 - 19:02:55 »
Der Code ist eigentlich janz kleen ;) :

Wieso. Das sind 5 Zeilen!!!!
Wie manchmal ein bischen Randbemerkung:
Bei meiner derzeitigen J2ee/Spring-Framework-Forschungsprojekt-Programmierung hab ich jetzt die Regel eingeführt, dass ich mir bei >8 Zeilen pro Methode Gedanken mache, es zu kürzen bzw. auf mehrere Methoden zu verteilen.
Bin ein Anhänger von kurzen Code-Einheiten.

Second Martin: Teile uns bitte mit, welcher http-code vom Server zurückgeliefert wird. Das ist wirklich interessant und evtl. sind da issues versteckt.

aber besser mit #
Code
print "httpStatus sent back by server=" & html.httpStatus(0) 
Axel
« Letzte Änderung: 20.06.05 - 22:49:37 von Marinero Atlántico »

Offline andrew22

  • Aktives Mitglied
  • ***
  • Beiträge: 126
  • Ich liebe dieses Forum!
Re: GetDocumentByURL Problem
« Antwort #5 am: 21.06.05 - 13:45:47 »
läuft alles prima ... nur wie gesagt er gibt mir nur nen bissll aus und dat versteh ich net ..

woran kann das liegen ?!

das ist echt komisch :(

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz