HTTP ve FTP protolkollerini kullanır.
Inet1.Protocol = icHTTP
Inet1.RemotePort = 80
Inet1.UserName = “AliCan”
Inet1.PassWord = “12312312”
Inet1.AccessType = 2
Inet1.Proxy = “192.168.0.2:1253”
Inet1.OpenURL()
Text1.Text = Inet1.OpenURL(“http://www.hurriyet.com/”) ‘ HTML kod metin kutusuna
Text1.Text = Inet1.OpenURL(“ftp://ftp.al.com/dosya.txt”) ‘ Text metin kutusuna aktarılır
With Inet1
.URL = “ftp://ftp.dosyasan.com”
.Userame = “usta”
.Password = “yenibirgun”
End With
Inet.Execute “ftp://ftp.dokuman.com/” , “Get Kaynak.Txt c:\Kaynak.Txt”
Dim Form_Veri As String
Form_Veri = “find=insan”
Inet1.execute “http://www.arama.com/cgi-bin/ara.exe” , “POST”, Form_Veri
Text1.Text = Inet1.OpenURL(“http://www.arama.com/cgi-bin/ara.exe?find=insan”)
Byte Aktarım
Dosya = “ftp://ftp.dosyalist.com/icq.exe”
Dosya_No = FreeFile
Temp() = Inet1.OpenURL(Dosya, icByteArray)
Open “icq.exe” For Binary Access Write As #Dosya_No
Put #Dosya_No, Temp()
Close #Dosya_No
Text Aktarım
Dosya = “ftp://ftp.dosyalist.com/dosyalistesi.txt”
Dosya_No = FreeFile
Open “dosyalistesi.txt” For Output As #Dosya_No
Write #Dosya_No, Inet1.OpenURL(Dosya)
Close #Dosya_No
INET - Özellikler
AccessType
********
Index
Left
Password
Protocol
Proxy
RemoteHost
RemotePort
RequestTimeOut
StillExecuting
Tag
URL
UserName
AccessType : Erişim tipi
Password : Kullanıcı şifresi
Proxy : Proxy server adresi ( AccesType -2 )
URL : URL
RemotePort : Bağlantı kurulacak port numarası
( HTTP – 80, FTP – 21, Mail Server POP - 110 )
RequestTimeOut : Bağlantı için bekleme süresi
( Bağlantı gerçekleşmezse StateChange oluşur )
StillExecuting : True - Meşgul
UserName : Kullanıcı Adı
INET - Olaylar
StateChanged : Bağlantıda oluşan değişiklikler
INET - Yöntemler
Cancel
Execute
GetChunk
GetHeader
OpenURL
OpenURL : URL ye bağlantı
Execute : Gelişmiş URL bağlantısı ( FTP )
GetChunk : FTP - Veri transferi
Execute / HTTP
Get : Dosya alımı
Head : URL içerisinde tanımlı dosya adları
Post : Bilgi yollama
Put : URL içerisinde veri değişimi
Inet1.Execute “http://www.alan.com/index.htm” , “Get”
Execute / FTP
CD : Dizin değiştirme “CD Kaynaklar\Yeni”
CDUp : Bir üst dizinine geçiş “CDUP”
Delete : Dosya sil “DELETE Kaynak.txt”
Dir : Dizindeki dosya listesi “DIR Kaynaklar”
Get : Karşıdan dosya transferi “Get Kaynak.Txt c:\Kaynak.Txt”
MkDir : Dizin oluşturma “MKDIR /YeniDizin”
Put : Karşı ya dosya transferi “PUT c:\Kaynak:txt kaynak:txt”
Pwd : Dizin yazıcıya gönederilir “PWD”
Quit : Bağlantı kesilir “QUIT”
Recv : Karşıdan dosya transferi “RECV Kaynak.Txt c:\Kaynak.Txt”
Rename : Dosya ismi değiştirme “RENAME Kaynak.Txt KaynakYeni.Txt”
RmDir : Dizin silme “RMDIR SilinecekDizin”
Send : Karşıya dosya transferi “SEND c:\Kaynak:txt kaynak:txt”
Size : Dosya boyutu “SIZE Kaynak.Txt
Inet.Execute “ftp://ftp.dokuman.com/” , “Get Kaynak.Txt c:\Kaynak.Txt”
