Ftp 1 , 2, 3

xTurk01
31-01-2010, 11:54   |  #1  
OP Yeni Üye
Teşekkür Sayısı: 0
20 mesaj
Kayıt Tarihi:Kayıt: Eki 2009

Inet1.RemoteHost = "ftp://adres.com"
Inet1.URL = "ftp://adres.com"
Inet1.Protocol = icFTP
Inet1.RemotePort = 21
Inet1.UserName = "kullanıcı"
Inet1.Password = "sifre123"
Inet1.RequestTimeout = 40


Inet1.Execute , "CD anon_ftp" & vbCrLf
Do While Inet1.StillExecuting
DoEvents: DoEvents: DoEvents
Loop

Inet1.Execute , "CD incoming" & vbCrLf
Do While Inet1.StillExecuting
DoEvents: DoEvents: DoEvents
Loop


Inet1.Execute , "SEND c:\index.php index1.php.text" & vbCrLf
Do While Inet1.StillExecuting
DoEvents: DoEvents: DoEvents
Loop


şimdi
"SEND c:\index.php index1.php"
şu index1.php yi saydırmalıyım fakat olmuyor. Yani index1.php , index2.php , index3.php diye saydırmam lazım . Ben şöyle bişe yaptım

private index as interger

index=index + 1
text1.text = "index" + str(index) + ".php"

yaptım gayet güzel sayıyor , yüklemeyide şu şekilde ayarladım

"SEND c:\index.php" + "text1.text"


ama yüklemiyor , sizce nasıl bişe yapabilirim

KuaforPlus
03-02-2010, 19:53   |  #2  
KuaforPlus avatarı
Yıllanmış Üye
Teşekkür Sayısı: 1
223 mesaj
Kayıt Tarihi:Kayıt: Nis 2007

"text1.text"  i bu şekilde yazarsanız string olarak text1.text içeriğini değil de kendini adını vermiş olursunuz.
Çift tırnak içinde geçen string olarak algılanır.
text1.text içinden veri okuyabilmek için
 
"SEND c:\index.php " & Text1.Text   şeklinde kodu yazmalıydınız.

xTurk01
04-02-2010, 19:36   |  #3  
OP Yeni Üye
Teşekkür Sayısı: 0
20 mesaj
Kayıt Tarihi:Kayıt: Eki 2009

öyle oluncada yüklemiyor