document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. \' Gambas class file
  2. Public Sub Form_Open()
  3.  
  4.   Editor1.Highlight = Highlight.JavaScript
  5.   Editor1.ReadOnly = True
  6.  
  7. End
  8. Public Sub ButtonEXTRAER_Click()
  9.  
  10.   Editor1.Text = usandoComandoWget(TextBoxURL.text)
  11.  
  12. End
  13.  
  14. Public Sub ButtonEXTRAER2_Click()
  15.  
  16.   Editor1.Text = usandoHttpClient(TextBoxURL.Text)
  17.  
  18. End
  19.  
  20. Public Sub Form_Resize()
  21.  
  22.   Editor1.w = Me.W - 10
  23.   Editor1.h = Me.h - Editor1.y - 20
  24.  
  25. End
');