home *** CD-ROM | disk | FTP | other *** search
/ PC World 1997 November / PCWorld_1997-11_cd.bin / software / programy / FBL / TCPBATCH / DEMO / SCRIPTS / UKAZKA07.TCP < prev    next >
Text File  |  1997-07-13  |  2KB  |  47 lines
  1. // ukßzka Φ.7 - script podobn² ukßzce Φ.6, ovÜem stahujφcφ soubor p°es proxy
  2. // ------------ server (typu http-proxy)
  3.  
  4. // Pou₧ity p°φkazy: Send, WaitFor, OutputFile, CloseOutput, Input
  5. // Respektuje d°φve navßzanΘ spojenφ
  6.  
  7. // Script nßsleduje typicky po parametru "-c <proxy-server> <proxy-port>" a
  8. // umo₧nφ p°ijmout jeden soubor z http-proxy protokolem http, ftp nebo gopher
  9.  
  10. Input "Zadejte protokol (http, ftp nebo gopher):"
  11. // Do systΘmovΘ prom∞nnΘ line je ulo₧en text protokolu
  12.  
  13. Send "GET " line "://"
  14. // Zaslßn prefix protokolu
  15.  
  16. Input "Zadejte jmΘno poΦφtaΦe (IP-adresu nebo DNS-jmΘno):"
  17. // Do systΘmovΘ prom∞nnΘ line je ulo₧eno jmΘno poΦφtaΦe, z n∞ho₧ se mß soubor
  18. // stßhnout
  19.  
  20. Send line "/"
  21. // Zaslßno jmΘno poΦφtaΦe
  22.  
  23. Input "Zadejte jmΘno souboru, kter² chcete p°ijmout:"
  24. // Do systΘmovΘ prom∞nnΘ line je ulo₧eno jmΘno souboru zadanΘ obsluhou
  25.  
  26. Send line " HTTP/1.0" nl
  27. Send "User-Agent: TCPBatch (Win95)" nl
  28. Send "Accept: image/gif, image/jpeg" nl
  29. Send nl
  30. // Zaslßna typickß ₧ßdost o soubor. Nßsledujφcφ Φßsti jsou ji₧ shodnΘ
  31. // s ukßzkou Φ.6
  32.  
  33. WaitFor EmptyLine
  34. // P°eskoΦφ zßhlavφ dokumentu, kterΘ je ukonΦeno prßzdnou °ßdkou
  35.  
  36. OutputFile PRIJATO.DAT
  37. // Od tohoto okam₧iku budou p°ijφmanß data binßrn∞ opisovßna do souboru
  38. // PRIJATO.DAT v tomtΘ₧ adresß°i, kde je ulo₧en script
  39.  
  40. WaitFor End
  41. // NaΦte data a₧ do ukonΦenφ spojenφ, souΦasn∞ je zapisuje do souboru. Spojenφ
  42. // se uzav°e samo, nenφ nutnΘ provßd∞t Disconnect
  43.  
  44. CloseOutput
  45. // Uzav°e soubor (nenφ nutnΘ explicitn∞, ukonΦenφ interpretace vÜech script∙
  46. // uzavφrß soubor samo od sebe). Soubor je nynφ pou₧iteln² jin²mi programy.
  47.