🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: chile.comp.programacion
Article #427

Re: Ayuda con VBS

#427
From: Pintamono
Date: Thu, 02 Apr 2009 23:58
59 lines
2828 bytes
voy a averiguar, gracias.


"Timo" <asdas@asdas.cl> wrote in message 
news:gr3agf$3174$1@adenine.netfront.net...
> No se ha ocurrido usar un instalador como NSIS ? esos problemas esta 
> resueltos.
>
>
> "pintamono" <pintamono@NoMandeWeas.kk> escribi� en el mensaje 
> news:205c21e5760a8298804526e7cb79b440$1@usenet.no-ip.com...
>> Que tal, tengo un "problema" con VBS
>>
>> resulta que tengo lo siguiente para ejecutar una aplicacion:
>>
>> Dim WshShell,valor
>>
>> set WshShell=WScript.CreateObject("WScript.Shell")
>>
>> On Error Resume Next
>>
>> valor = WshShell.RegRead("HKLM\Software\Microsoft\NET Framework
>> Setup\NDP\v2.0.50727\Install")
>>
>> If valor = 1 Then
>>
>> WshShell.run "cmd /c ""POSOneInstaller.exe""",0,True
>>
>> ' WshShell.Run "POSOneInstaller.exe"
>>
>> End If
>> If valor = 0 Then
>> valor =
>> WshShell.RegRead("HKLM\SOFTWARE\Microsoft\.NETFramework\policy\v2.0")
>>
>> if valor = 0 then
>> Msgbox "No tiene Framework 2.0, se proceder� a su
>> instalaci�n.",vbYes,"Atenci�n"
>> WshShell.Run "..\Prerrequisitos\Framework2.exe"
>> end if
>> End If
>>
>> Esto lo que hace es verificar que exista el FW 2.0, si existe ejecutra mi
>> aplicacion.
>>
>> El punto es que en un XP no executa la aplicacion, entra al script
>> verifica y todo pero al momento de ejecutar no hace nada...
>> Pense que era el metodo de ejecucion asi que puse otro y nada, pense que
>> eran las carpetas asi que movi el vbs a la raiz y nada, le puse en el
>> metodo de llamado "..\" ahi me ejecuta la aplicacion pero esta se cae
>> porque no encuentra un archivo ???, si lo hago en mi maquina (w2003) con
>> el mismo vbs esto funciona sin problemas...
>>
>> alguna idea de como solucionar esto? o de como hacerlo?
>>
>> Gracias.
>>
>
> 
Technical Details
Message-ID: <gr3jfq$n3d$1@jagger.tie.cl>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.glorb.com!news.kjsl.com!news.nivel5.cl!news2.ifxnw.cl!news.tie.cl!not-for-mail
References: <205c21e5760a8298804526e7cb79b440$1@usenet.no-ip.com> <gr3agf$3174$1@adenine.netfront.net>

Show Full Headers
Complete Article Headers
X-Google-Thread: 1593cb,5065db104ff67425
X-Google-Attributes: gid1593cb,domainid0,public,usenet
X-Google-Language: SPANISH,ASCII
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.glorb.com!news.kjsl.com!news.nivel5.cl!news2.ifxnw.cl!news.tie.cl!not-for-mail
From: "Pintamono" <pintamono@NoMandeWeas.kk>
Newsgroups: chile.comp.programacion
Subject: Re: Ayuda con VBS
Date: Thu, 2 Apr 2009 19:58:49 -0400
Organization: Telefonica Internet Empresa
Lines: 61
Message-ID: <gr3jfq$n3d$1@jagger.tie.cl>
References: <205c21e5760a8298804526e7cb79b440$1@usenet.no-ip.com> <gr3agf$3174$1@adenine.netfront.net>
NNTP-Posting-Host: 78-128-22-190.adsl.terra.cl
X-Trace: jagger.tie.cl 1238716730 23661 190.22.128.78 (2 Apr 2009 23:58:50 GMT)
X-Complaints-To: news@jagger.tie.cl
NNTP-Posting-Date: Thu, 2 Apr 2009 23:58:50 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.3790.3959
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.3790.4325
X-RFC2646: Format=Flowed; Response