C4atreros.es

Haber que tal andamos de Visual Basic o de Javascript

Alguien me podria hacer un programilla? Yo esque ya no mea cuerdo de Visual Basic y Javascript nunca he sabido pero alguien que lo tenga fresco no tardaria nada en acerlo

Digamos que al estar abierto el programa, Cada 61 minutos se tendria que ejecutar un enlace HTML a modo de acceso directo, si se cierra o no la pagnia da lo mismo pero que aga como si cada hora diesemos a ese enlace.

Quien seria la muy buena persona q me echaria una manoooo jejeje

gomezpla escribió:...habierto...

Yo mano te voy a echar, pero al pescuezo, por dejarme cegato... .

Anda anda, en vez de tanto programita pilla un libro y lee .


P.D: Con todo el cariño Edu ehhh .


EDITO: Y el título del post es parra llorar... Pregunta a DEMEN a ver si está bien escrito .

joder .. Xd que patada al diccionario en serio no se xq me pasan estas cosas, nunca se me ocurriria decir que abierto es con h es mas escribiendo a mano es una falta que estoy seguro que nunca comenteria pero no se ... alguna mania q tenga al teclquear .. :S:S

¿no se dice programador? XD

gomezpla escribió:joder .. Xd que patada al diccionario en serio no se xq me pasan estas cosas, nunca se me ocurriria decir que abierto es con h es mas escribiendo a mano es una falta que estoy seguro que nunca comenteria pero no se ... alguna mania q tenga al teclquear .. :S:S

¿no se dice programador?

No se dice "haber", sino "A ver" .


Se que es una falta que solo se comete por equivocación al teclear, pero ya sabes que te tengo que chinchar .

sip xinxame xq total XD xq progrmar poco xd jajaja me tendre q acer un curso rapido de visual basic

hombre si he entendido lo que quieres hacer eso es refresh que cada x tiempo se ejecute el link, algo parecido tiene el tagboard de la pagina principal que actualiza cada x segundos...

ya pero al codigo dle tagboard no se tiene acceso jeje (creo)

gomezpla escribió:ya pero al codigo dle tagboard no se tiene acceso jeje (creo)

si es eso no creo que tengas ningun problema buscandolo por internet el código...
Yo antes me movia mucho en creacion de webs y tenia bastantes comandos y progamitas javascript y me suena a ver usado algo asi...

Has probado con el programador de tareas de Windows? Igual te sorprendes y funciona. Yo creo haberlo conseguido, pero creo que en vez de actualizar la web, me abre el enlace de nuevo No he tenido paciencia para esperar jeje

Suerte!

Alvinillo escribió:Has probado con el programador de tareas de Windows? Igual te sorprendes y funciona. Yo creo haberlo conseguido, pero creo que en vez de actualizar la web, me abre el enlace de nuevo No he tenido paciencia para esperar jeje

Suerte!

la buena noticia esque yo lo que necesito es que abra la pagina web de nuevo jejeje

la mala esq que no me deja, tengo creado un acceso directo a la pagina que quiero, y me dice que nanai de la china que no es un programa jeje

gomez si lo ke necesitas es una forma de hacer lo que dices. bajate el AutoIT y programa la macro. se hace muy intuitivamente, desde una interfaz de seleccionar comando y pegar, y si deseas enrollarte puedes hacer virguerias editando en texto. Luego puedes compilarla en ejecutable con el mismo Autoit o correrla en tiempo de ejecucion directamente desde el código.

Mucho mas facil que aprender visual basic o javascript a estas alturas.

con lo de las tareas de windows puedes probar bajandote un explorador que no uses y poner de página principal la url que te interese. Luego que el programador de tareas te ejecute ese navegador.

eishshh gracias por esos consejos jejeje al final me puse y retome lo que habia dejado ace 6 años VB XD

Dim P
Option Explicit

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Const SW_NORMAL = 1

Private Sub Command1_Click()
Dim X
X = ShellExecute(Me.hwnd, "Open", Text1.Text, &O0, &O0, SW_NORMAL)
Timer1.Enabled = True
Command1.Enabled = False
Text1.Locked = True
Text2.Locked = True
End Sub

Private Sub Form_Load()
P = 0
End Sub

Private Sub Timer1_Timer()
If Text2.Text > 0 Then
If Label1.Caption = 0 Then
Dim X
X = ShellExecute(Me.hwnd, "Open", Text1.Text, &O0, &O0, SW_NORMAL)
Label1.Caption = "3780"
Text2.Text = Text2.Text - 1
Else:
Label1.Caption = Label1.Caption - 1
End If
Else:
Timer1.Enabled = False
Command1.Enabled = True
Text1.Locked = False
Text2.Locked = False
End If
End Sub


Gracias a todos jajjajja el que tuvo retuvo