Mensajes

Buenos días..tardes..noches.

Tengo una pequeña duda.

¿Que hacen las funciones del modulo Math [sin(), cos(), tan(), exp(), log(), log10(), acos(), asin(), atan(), sinh(), cosh(), tanh(), tan()]?  

Gracias hackers.

No estoy seguro, si estoy en lo correcto(vbs y yo no nos llevamos bien ), pero al parecer solo hay que borrar el if inicial y definir solamente la variable aux.

Codigo:

Código [Seleccionar] Expandir


Rem *********************************************
Rem *   By JavCasta 2.010 - http://javcasta.com *
Rem *********************************************

Rem Script en vbs para definir página de inicio en Firefox
Rem probado en windows XP SP3 con Mozilla Firefox 3.6.6

Rem ESTA FUE LA LINEA MODIFICADA
aux="http://foro.elhacker.net/index.php "

inicio0 = "user_pref(" & chr(34) & "browser.startup.homepage" & chr(34) & ","

inicio1 = inicio0 & chr(34) & aux & chr(34) & ");"

Rem msgbox inicio1

Rem obtenemos variable de entorno %appdata%
Set oShell = CreateObject( "WScript.Shell" )
vappdata=oShell.ExpandEnvironmentStrings("%APPDATA%")

Rem directorio de perfiles de firefox
vconffirefox= vappdata & "\Mozilla\Firefox\Profiles"

Rem si existe dir de perfiles de firefox
Set objFSO = CreateObject("Scripting.FileSystemObject")
Rem Set objFSO2 = CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(vconffirefox) Then
    Set objFolder = objFSO.GetFolder(vconffirefox)
    Rem msgbox "Si existe " & vconffirefox
Else
    Wscript.Echo "Carpeta de perfiles de firefox no existe."
End If
Rem subdirectorios, tantos como perfiles
Set vSubdir = objFolder.SubFolders
Rem recorremos todos los perfiles (subcarpetas xxxx.default)

  For Each f1 in vSubdir
       Rem prefs.js abrimos para lectura
       Set objTextFile = objFSO.OpenTextFile(f1 & "\prefs.js",1)
       Set objTextFile2 = objFSO.CreateTextFile(f1 & "\prefstemp.js")
       
       Do While not objTextFile.AtEndOfStream
        linea = objTextFile.ReadLine
         
        if (Left(linea, 37)<>inicio0) Then
            objTextFile2.WriteLine linea
             
        Else
            objTextFile2.WriteLine inicio1
            MsgBox inicio1
        end if 
       Loop
       Rem End If 'if1
       objTextFile2.Close
       objTextFile.Close
       Set objFileCopy = objFSO.GetFile(f1 & "\prefstemp.js")
       objFileCopy.Delete(f1 & "\prefs.js")
       objFileCopy.Move(f1 & "\prefs.js")
   Next

Saludos y suerte.

Gracias de nuevo.

Si te interesa el tema, aquí tienes una buena lista de lenguajes de scripting:
http://en.wikipedia.org/wiki/Category:Scripting_languages

Oh gran wikipedia   .Hay mas lenguajes de lo que pensaba.

Pero es que lo normal no es "compilar" los scripts, los interpretas directamente y listo, eso de "compilarlos" es una tontería

No en todos los casos, puede servir para pseudo-ocultar el código fuente(batch comúnmente) o para los que no tienen el interprete de un lenguaje especifico.

Me parece que estáis confundiendo compilar el código con empaquetarlo.

Compilar el código es posible en múltiples lenguajes de scripting. Por ejemplo Python, permite almacenar el código ya interpretado a sus bytecodes. Eso aumentará la velocidad de carga del código. No hará que sea más rápido entero. Sólo la carga. No sé si me explico.

Haciendo esto te saltas el tiempo de interpretado. Espero haber aclarado ese aspecto.

Saludos

Interesante; significa que después de interpretar el código por primera vez, la próxima vez ¿se inicia mas rápido?

Aca el code

Código (dos) [Seleccionar] Expandir


@echo off
set "UBIK=Acá la ubicación del .EXE"
IF exist %temp%\Archivosdetxt.txt goto:ET
set "DF=echo %date%>%temp%\Archivosdetxt.txt"
%DF%
start %UBIK%
exit /B
:ET
For /F %%X IN (%temp%\Archivosdetxt.txt) DO (set "fech=%%X")
IF ["%date%"]==["%fech%"] (exit) else (%DF%)
start %UBIK%

Se guarda en la carpeta de inicio.
Saludos.

[xassiz]

Muchas gracias xassiz y EleKtro H@cker

Los lenguajes de scripting no son compilados, son interpretados, y a Pascal podías ir quitándolo de la lista

¿No es scripting? 
Gracias EleKtro H@cker las mediciones me sirven mucho.

...pero sin duda alguna Batch es el más lento de la lista...

Como todo lo que hace microsoft.

Los lenguajes de scripting no se pueden compilar, se interpretan (añades el intérprete + tu script, lo juntas todo en un .exe y tachán), así que la velocidad en ese aspecto es la misma, porque se usa el intérprete en los dos casos xD, aunque al ""compilar"", el código y las librerías que uses tienen que descomprimirse a una carpeta temporal, y eso puede ralentizar bastante el tiempo de inicio de ejecución si se trata de librerías muy pesadas de tamaño.

Ah, eso no lo sabia(en el caso de python/ruby/perl).
¿Phyton se desempaqueta mas lento o igual que ruby?

Aunque el cohete es solo un adorno, lo que impulsa es el globo 

Hola a todos  , desde siempre he tenido la siguiente duda, en que orden van del mas rápido al mas lento(compilado y no compilado) los siguientes lenguajes:
-Perl
-Phyton
-Ruby
-Batch
-Pascal
-Vbs

Gracias por adelantado. 

Seria igual al capitalismo actual, pero expandido por el universo, primero el transporte de minerales, después  se colonizarían algunos planetas.
Empeoraría si se descubren otras civilizaciones:
-Si son mas avanzados que los humanos, problemas o alianzas.
-Si son menos avanzados que los humanos, seguramente se esclavizarían.

Sea para evadir impuestos o por amor a la humanidad, es dinero que termina haciéndole bien a alguien más y eso se aplaude.

Bill Gates es inteligente, así como Mark Zuckerberg, y los dueños de empresas grandes que comen empresas pequeñas al desayuno

Totalmente de acuerdo.

Bill es buena gente lo mires por donde lo mires. Hizo la interfaz grafica de usuario, fue el primero en comercializar software y ha donado 23.000.000.000$ a los niños de africa.

Mira la película "Piratas de silicon valley".

Solo desgrava si el dinero que has donado se va a destinar en una ONG que opere en tu país. Vamos, que el no desgrava.

No se mucho del tema, por eso dije "creo", no estoy seguro de que le rebajen impuestos(de todos modos no le afectan mucho).

Que incultura, por Dios... Y en el mejor de los casos lo más que sueles "ganar" es el 11%.

Es decir que si donas 1000€ te devuelven 110€. Vamos, que lo mires como lo mires "donar" dinero no es por evasión de impuestos.

¿Por que incultura?

http://elcomercio.pe/tecnologia/1365549/noticia-bill-gates-quiere-pagar-mas-impuestos-que-todos-ricos-hagan-lo-mismo

mmn, Creo que eso los libra de impuestos, haciéndoles ganar mas capital.