l
logo astronomo.org  Astrónomo.org
Astronomía · Telescopios · Astrofotografía · Observación ¡20 AÑOS ONLINE! (2006 - 2026)
Bienvenido(a), Visitante
 Quiero Participar o ingresa
Ingresar nombre de usuario, contraseña, duración de la sesión
  

Búsqueda Avanzada     

recomendados por nuestro foro Recomendando desde 2009 a:
astroshop
... página cargada a fecha y hora :
287154 post, 20337 Temas, 11484 users
último usuario registrado:  Dorito
avatar invitado

Script de ALARMA para MaximDL (y mi problema al ejecutarlo!)

Imprimir
clase Autor
rat0
astrons:   votos: 0
Bufot
Observatori Petit St.Feliu

**

avatarc

Xavi MPC-D02

50  St. Feliu Llob. Barcelona 
desde: ene, 2010
mensajes: 9647
clik ver los últimos




icono-mensaje

« : Sáb, 05 Abr 2014, 14:38 UTC »

Hola

https://deepspaceplace.com/maximdlalarm.php

Se trata de un script que hace una llamada a través de Skype en aquellos casos donde lo implantemos: El más usado es en caso de perder la estrella de guiado, ya que esto puede provenir de muchas causas pero causar un sólo efecto, y es que la sesión fotográfica no va a ir bien. Las causas pueden ser muchas, nubes, topes de montura, cables tirantes, etc... También se puede usar al finalizar una sesión, o en otros casos.

En concreto es éste:
Dim WSHShell Set WSHShell = WScript.CreateObject("WScript.Shell") ' open normal and do not wait WSHShell.Run chr(34) & "C:\Program Files\Skype\Phone\skype.exe" & chr(34) & " /callto:+610499999999", 1, false Set WSHShell = Nothing WScript.Quit(0)

Hace tiempo que le tengo el ojo echado y ayer ya intenté ejecutarlo pero... lo de siempre, que va a ser que no quiere funcionar
Yo no tengo llamadas a móvil con Skype pero intenté configurarlo para llamar a un contacto, ese no es el problema porque en realidad el script ni siquiera consigue lanzar Skype

Es extraño porque aseguran que funciona pero a mí me da un error de comando (programación) ya en la primera línea, os dejo una captura para que lo veáis:


Yo de programación ni idea, se que esto ya es para nota hihi pero veo que hay grandes entendidos por el foro así que voy a probar a ver si alguien sabe que es lo que ocurre  sudando
En cualquier caso gracias por vuestra ayuda y ahí lo dejo por si os sirve!

« Últ. modif.: Sáb, 05 Abr 2014, 14:40 UTC por Bufot »
- - -

elinformatico

**
/SolarSystem/Earth /Europe/Spain/León 
desde: nov, 2012
mensajes: 676
clik ver los últimos




icono-mensaje

« respuesta #1 : Vie, 05 Sep 2014, 10:14 UTC »

Bufot, acabo de ver este hilo.

Es antiguo y puede que ya no estes interesado en ese script, pero te comento.

El error viene de la manera chapucera en como han escrito el script en la página original. Esta en una sola línea, cuando en realidad son varias lineas. Por eso da un error de que "Se esperaba un final de instrucción".

Ademas la ruta a Skype que indica es la propia de ordenadores en inglés con XP. En ellos los programas se guardan en "Program Files", mientras que en los ordenadores en castellano se guardan en "Archivos de programa".

Haz esto:

-Abre el block de notas y pégale estas líneas:

Cita
Dim WSHShell

Set WSHShell = WScript.CreateObject("WScript.Shell")

WSHShell.Run chr(34) & "C:\Program Files\Skype\Phone\skype.exe" & chr(34) & " /callto:+610499999999", 1, false

Set WSHShell = Nothing

WScript.Quit(0)

-Haz click derecho sobre el icono de Skype que tendrás en el escritorio y dale a "Propiedades"
-Copia la ruta a Skype que verás en el recuadro "Destino"
-Sustituye en la tercera línea la ruta "C:\Program Files\Skype\Phone\skype.exe" por la ruta en tu ordenador donde tengas instalado Skype. Cuidado con las comillas.
-Sustituye en esa misma linea "+610499999999" por tu número de teléfono.

Es decir, si la ruta a tu Skype es C:\Archivos de programa\Skype\Phone\skype.exe y tu número el (+34)600000000, el script deberia quedar así:

Cita
Dim WSHShell

Set WSHShell = WScript.CreateObject("WScript.Shell")

WSHShell.Run chr(34) & "C:\Archivos de programa\Skype\Phone\skype.exe" & chr(34) & " /callto:+34600000000", 1, false

Set WSHShell = Nothing

WScript.Quit(0)

(+34 es el prefijo internacional de España)

-Localiza la ruta donde tengas instalado Maxim DL (lo mismo, boton derecho sobre el icono del escritorio de Maxim DL - Propiedades - Destino)

-Haz click en el block de notas en Archivo-Guardar como... y guardalo con el nombre "call.vbs" dentro de la carpeta Scripts de donde tengas instalado Maxim DL

Una vez guardado, si ejecutas call.vbs directamente y todo ha ido bien, Skype debería ejecutarse y hacerte una llamada telefónica al número que hayas indicado.

-Sigue las instrucciones de la página original del script para configurar la alarma en Maxim DL.

Espero que con esto te funcione.

---------------------
Información técnica (solo para los que sepais de esto)

El script es muy sencillo. En las dos primeras líneas define (Dim WSHShell) y crea un objeto (WScript.CreateObject) llamado WSHShell, que es una instancia del Windows Scripting Host, una función de Windows que se usa para crear archivos y carpetas, ejecutar programas, etc...

En la tercera linea hace una llamada a la función Run del recién creado objeto WSHShell (WSHShell.Run) pasándole la ruta absoluta donde esté instalado Skype y el número al que queremos que Skype llame.

Una vez que Skype se ejecuta, se destruye el objeto WSHShell mediante (Set WSHShell = Nothing) y se finaliza el script (WScript.Quit(0)).

« Últ. modif.: Sáb, 06 Sep 2014, 08:36 UTC por elinformatico »
- - -

Bufot
Observatori Petit St.Feliu

**

avatarc

Xavi MPC-D02

50  St. Feliu Llob. Barcelona 
desde: ene, 2010
mensajes: 9647
clik ver los últimos




icono-mensaje

« respuesta #2 : Vie, 05 Sep 2014, 20:51 UTC »

Por supuesto que sigo interesado!

Bien hecho puede ser de una utilidad total para quienes pretendemos dejar el equipo funcionando de forma remota o desentendernos de el durante unas horas (equipo fijo en casa cuando al día siguiente toca currar)

Me pilla de viaje y no puedo probarlo ahora pero en cuanto llegue a casa le meto mano...

Vaya por delante mi agradecimiento por el tiempo que has tomado en repasar, corregir y compartirlo... Estas cosas se pagan! XD

Y que si no funciona será torpeza mía jajaja se ve que haces honor al nick y sabes de qué hablas OKOK

Importante: Comenté en mi mensaje anterior que no tengo llamadas por Skype a lo que no sea otro contacto Skype... Puedo cambiar la llamada a un móvil por la llamada a un contacto? Funcionará?

- - -

Efímero

**

avatarc

55  (Gipuzkoa) 
desde: ago, 2014
mensajes: 118
clik ver los últimos




icono-mensaje

« respuesta #3 : Vie, 05 Sep 2014, 21:09 UTC »

Pardiez "elinformatico", eres un maquina.

Envidia me das... buck2

Gracias por tu tiempo.

- - -

elinformatico

**
/SolarSystem/Earth /Europe/Spain/León 
desde: nov, 2012
mensajes: 676
clik ver los últimos




icono-mensaje

« respuesta #4 : Sáb, 06 Sep 2014, 09:33 UTC »

De nada, es un placer. Lo que más siento es no haber visto el hilo antes, si no, hubieras tenido la respuesta en abril.

Cita
Importante: Comenté en mi mensaje anterior que no tengo llamadas por Skype a lo que no sea otro contacto Skype... Puedo cambiar la llamada a un móvil por la llamada a un contacto? Funcionará?

Si. Simplemente en la tercera línea cambia el número de teléfono por el nombre de usuario del contacto al que quieras llamar.

Ejemplo: Si quieres que llame a Pepe y su nombre de usuario es pepeperez pues pones:

Cita
" /callto:pepeperez"

Si quieres que Skype te llame al móvil, entonces pones tu número de móvil, pero eso ya es un servicio de pago.

No olvides marcar la casilla para indicar a Skype que inicie sesión al arrancar, porque si no, en caso de alarma, arrancaría pero no te llamaría.

Ya me dirás si te funciona, y si tienes algún problema no dudes en postearlo aquí.


Mi nick no es casual , soy informatico y programador, además de aficionado a la astronomía.

Gracias a los dos.  Sonrisa

« Últ. modif.: Sáb, 06 Sep 2014, 10:33 UTC por elinformatico »
- - -

Bufot
Observatori Petit St.Feliu

**

avatarc

Xavi MPC-D02

50  St. Feliu Llob. Barcelona 
desde: ene, 2010
mensajes: 9647
clik ver los últimos




icono-mensaje

« respuesta #5 : Dom, 14 Sep 2014, 02:59 UTC »

Definitivamente mi agradecimiento más sincero para ELINFORMATICO   aplauso  aplaude  aplauso

Hoy he tenido la oportunidad de probar el script corregido que nos propuso y pese a mi ineptitud  Sonreir  ha funcionado a la primera Cheesy  yeah !

Puedo dejar el equipo trabajando de forma autónoma y en cuanto surge cualquier incidencia o finaliza la sesión, lanza el script y me realiza una llamada al móvil  ilusionado

Una utilidad genial que sin la ayuda de ELINFORMATICO jamás hubiese podido aprovechar. Gracias!!

- - -

elinformatico

**
/SolarSystem/Earth /Europe/Spain/León 
desde: nov, 2012
mensajes: 676
clik ver los últimos




icono-mensaje

« respuesta #6 : Lun, 10 Nov 2014, 17:39 UTC »

Acabo de volver a entrar a ver este hilo.

De nada Bufot, me alegro mucho de que te haya servido tan bien y te haya funcionado.

Cualquier problema informatico que tengas y pueda ayudarte si esta en mi mano, ya sabes que puedes ponerte en contacto conmigo.

- - -

keywords:
Imprimir
 
rat0

astrons:
votos: 0
Tema leído 7525 veces
_
rightback