Hi guys
I have a problem, when I make this I took permission denied error.
I supposed , I can't set of timers intervals.
Please help me , try this code on your vb.
We should make this working thanks, why I get error?
The Timers intervalls must have=?????? sec.
I need your help.

Private Sub Form_Load()
Timer5.Enabled = True
End Sub

Private Sub Timer1_Timer()
On Error Resume Next
Do While Inet1.StillExecuting
DoEvents: DoEvents: DoEvents
Loop
Inet1.Execute Inet1.URL, "Send d:\" & Date$ & "on.txt " & Date$ & "on.txt"
'Inet1.Execute Inet1.URL, "Send d:\" & Dosyaadi & " " & Dosyaadi
Timer6.Enabled = True
End Sub

Private Sub Timer2_Timer()
'With Inet1
Inet1.Protocol = icFTP
Inet1.URL = "http://ftp://adress.com"
Inet1.Password = "pass"
Inet1.username = "username"
'Inet1.RequestTimeout = 40
'Timer3.Enabled = False
'Timer1.Enabled = True
End Sub

Private Sub Timer3_Timer()

'Dim Dosyaadi As String
'Dim fullyol As String
'Dosyaadi = Environ("Computername") & ".log"
'fullyol = App.Path & "\" & Dosyaadi
'Open Dosyaadi For Append As #1
Open Date$ & "on.txt " For Append As #1
Print #1, Text1.Text
Close #1
Timer4.Enabled = True
'Timer1.Enabled = False

End Sub

Private Sub Timer4_Timer()

Timer3.Enabled = False
Timer1.Enabled = True
End Sub

Private Sub Timer5_Timer()
Timer2.Enabled = True
Timer3.Enabled = True
Timer1.Enabled = False

End Sub

Private Sub Timer6_Timer()
Timer1.Enabled = False
Timer5.Enabled = True
End Sub

timers 4,5,6 ?

wenas, i don't know what happeing xDD, your problem is with interval timer¿?
in form_load:
good bye 

PD:when you write the post, up there are many icons, you must use the labels in order to do commentaries         (Only for CODE)

wenas, plz upload your code to: http://rapidshare.com/ and 'postea' (your next post, url of you program).

sube tu codigo a esa pagina y luego poner la url de tu archivo, asi es mas facil.

un saludo