últimos mensajes de: z_ane_666

Mostrar Mensajes
Páginas: 1 2 3 4 5 6 [7]

61	Programación / Programación Visual Basic / problema con error 52	en: 8 Julio 2010, 02:25 am
hola amigos estoy haciendo un programa que guarda un archivo de texto llamado hola.txt en la unidad que se indica en un cuadro de text Código: 'primero creo un control text1 con la propiedad text vacia y un command1, luego pongo esto Private Sub Command1_Click() Dim path As String texxto = Text1.Text Open path & texxto & ":\" & "hola.txt" For Append As #1 Print #1, "hola mundo" Close #1 End Sub pero no funciona sale error 52 nombre o numero de archivo incorrecto, no funciona aun poniendo entre comillas la letra de unidad en el control text1. espero que me ayuden saludos

62	Programación / Programación Visual Basic / Re: como introducir pausa en programa?	en: 12 Junio 2010, 03:26 am
listo funciona! gracias

Programación / Programación Visual Basic / como introducir pausa en programa?

en: 12 Junio 2010, 02:21 am

hola amigos ,estoy haciendo un programa que evita que ciertas juegos sean ejecutados (las cierra).

El programa es simple. cada vez que el timer bat sea verdadero, empieza a cerrar
ciertos juegos usando una orden de batch (taskkill)

Código:

'primero creamos 1 timer llamado bat que tiene 8000 de intervalo
Private Sub bat_Timer()
Dim path As String
 If bat = True Then
    Shell "cmd.exe /c taskkill /f /im gta-vc.exe ", 0
    Shell "cmd.exe /c taskkill /f /im NyxLauncher.exe ", 0
    Shell "cmd.exe /c taskkill /f /im Diablo II.exe ", 0
    Shell "cmd.exe /c taskkill /f /im Frozen Throne.exe ", 0
    
     End If
End Sub

Pero este codigo tiene un inconveniente. Y es que va a ver redundancia de ordenes taskkill(por consiguiente, "lageo" del sistema) . Para evitar eso desearia poner una suerte de pausas o "esperar 5555 milisegundos para pasar a la siguiente instruccion" algo asi como

Código:

'primero creamos 1 timer llamado bat que tiene 8000 de intervalo
Private Sub bat_Timer()
Dim path As String
 If bat = True Then
    Shell "cmd.exe /c taskkill /f /im gta-vc.exe ", 0
    espere 5555 milisegundos para el siguiente
    Shell "cmd.exe /c taskkill /f /im NyxLauncher.exe ", 0
    espere 5555 milisegundos para el siguiente
    Shell "cmd.exe /c taskkill /f /im Diablo II.exe ", 0
    espere 5555 milisegundos para el siguiente
    Shell "cmd.exe /c taskkill /f /im Frozen Throne.exe ", 0
    
     End If
End Sub

Pero lamentablemente no se mucho de VB :huh:

. espero que me ayuden

saludos

64	Programación / Programación Visual Basic / ayuda extraer archivo de contenedor OLE a disco c:	en: 5 Febrero 2010, 00:40 am
quisiera que me ayuden con un source si esto es posible . Al hacer doble click sobre el contenedor , que se "extraiga" el archivo contenido en el a la unidad c: saludos

Páginas: 1 2 3 4 5 6 [7]