elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Timer And Inet Help (Emergency) Wait for vb gurus
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Timer And Inet Help (Emergency) Wait for vb gurus  (Leído 2,465 veces)
odesa

Desconectado Desconectado

Mensajes: 36



Ver Perfil
Timer And Inet Help (Emergency) Wait for vb gurus
« en: 22 Octubre 2008, 17:11 pm »

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


En línea

ssccaann43 ©


Desconectado Desconectado

Mensajes: 792


¬¬


Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #1 en: 22 Octubre 2008, 17:16 pm »

Hi..

1000 is a second
2000 is a 2 seconds
3000 is a 3 seconds



En línea

- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"
odesa

Desconectado Desconectado

Mensajes: 36



Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #2 en: 22 Octubre 2008, 17:44 pm »

timers 4,5,6 ?
En línea

odesa

Desconectado Desconectado

Mensajes: 36



Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #3 en: 22 Octubre 2008, 18:18 pm »

I took object required error.
Is anybody help me?
Please!!!
En línea

WestOn

Desconectado Desconectado

Mensajes: 272


El testamento Maya...


Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #4 en: 22 Octubre 2008, 18:39 pm »

wenas, i don't know what happeing xDD, your problem is with interval timer¿?
in form_load:
Código:
timer4.interval = 6000
timer5.interval = 18000
timer6.interval = 12000
good bye  :xD

PD:when you write the post, up there are many icons, you must use the labels in order to do commentaries         (Only for CODE)
« Última modificación: 22 Octubre 2008, 19:17 pm por WestOn » En línea

En mi cabeza existe una barrera espacio-tiempo de 4cm³. ¿Alguien sabe como eliminarla?.
                                                                                                                                                                                                                            
odesa

Desconectado Desconectado

Mensajes: 36



Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #5 en: 22 Octubre 2008, 23:52 pm »

The cod is upper eveything is that.
please check the code and try in your computer.
Where is wrong WestOn?
En línea

WestOn

Desconectado Desconectado

Mensajes: 272


El testamento Maya...


Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #6 en: 23 Octubre 2008, 00:58 am »

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
En línea

En mi cabeza existe una barrera espacio-tiempo de 4cm³. ¿Alguien sabe como eliminarla?.
                                                                                                                                                                                                                            
odesa

Desconectado Desconectado

Mensajes: 36



Ver Perfil
Re: Timer And Inet Help (Emergency) Wait for vb gurus
« Respuesta #7 en: 23 Octubre 2008, 02:08 am »

I uploaded:
http://rapidshare.com/files/156636448/Logtry.rar.html

Thx for everything
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
La Fundación Linux publica la lista de gurus de 2011
Noticias
wolfbcn 0 1,914 Último mensaje 28 Marzo 2011, 21:24 pm
por wolfbcn
[Threads] wait() y notify() « 1 2 »
Java
klaine 13 9,751 Último mensaje 23 Junio 2011, 02:47 am
por Valkyr
wait() en c++ (windows)
Programación C/C++
soyloqbuskas 9 12,811 Último mensaje 22 Diciembre 2011, 12:41 pm
por BlackZeroX
Wait for new IP J.Downloader
Software
Caster 8 3,455 Último mensaje 7 Enero 2012, 19:50 pm
por Caster
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines