German Richtig in die Schleife

[Sinan Tuzcu]

Hallo,

weis einer wie ich das richtig in die Schleife reinpacken kann?

so wie ich das hier habe, werden mir nur die Daten vom ersten Zeile geliefert und alles ndere geht irgendwie verloren

Dim Cursor2 As Cursor
Dim request2 As HttpRequest

Cursor2 = SQL2.ExecQuery("SELECT User FROM Buch")
   
      For j = 0 To Cursor2.RowCount - 1
         Cursor2.Position = j
         request2.InitializeGet("http://www.xxxxxx.de/xxxx/xxxx.php?Username=" & Cursor2.GetString("User"))          
         HClient.Execute(request2, 1)
      Next
      
   
Cursor2.Close

 

[Kiffi]

Der HttpRequest verläuft asynchron. Sprich: ResponseSuccess oder
ResponseError werden nicht augenblicklich gefeuert, sondern, wenn
die angeforderten Daten dann irgendwann mal eintrudeln.

Das bedeutet für Dich, dass Du den nächsten Request in der Schleife
erst dann absetzen solltest, wenn einer dieser beiden Events
stattgefunden haben.

Grüße ... Kiffi

 

[Sinan Tuzcu]

Hallo Kiffi,

danke für deine Hilfe, was meinst du, wie könnte man das sinnvoll realisieren?

Denn, dieses wird mit Button1 getriggert:

Dim Cursor2 As Cursor
Dim request2 As HttpRequest

Cursor2 = SQL2.ExecQuery("SELECT User FROM Buch")
    
        For j = 0 To Cursor2.RowCount - 1
            Cursor2.Position = j
            request2.InitializeGet("http://www.xxxxxx.de/xxxx/xxxx.php?Username=" & Cursor2.GetString("User"))             
            HClient.Execute(request2, 1)
        Next
        
    
Cursor2.Close

und wie sollte der nächste stoß in der ResponseSuccess Ereignis
sein?

denn die Schleife sitz ja in der Button1.

hmmmm :-(