Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Error Com

0 views
Skip to first unread message

Dario

unread,
Jul 2, 2009, 8:54:42 AM7/2/09
to

Bajo version 6

Tengo el siguiente codigo para averiguar si hay un Cd en la unidad, el cual
me da error de COM que funciona bajo Xp como usuario limitado...

conf=_screen.trabajo+"config.ini"
cd=leeini(conf,"General",'cd')

* Para saber si una unidad esta disponible
LOCAL loFSO, loDrive
loFSO = createobject('Scripting.FileSystemObject')
loDrive = loFSO.GetDrive("&cd")
x = lodrive.driveletter
unid=IIF(loDrive.IsReady,'SI','NO')

sigue...

Algo que en el Xp del cliente falto instalar?

En mi Pc donde programo bajo Xp funciona y no me da error, alguna idea
gracias...

--
Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar


Edwin Duran

unread,
Jul 2, 2009, 9:18:21 AM7/2/09
to

Dar�o

Verificaste si el cliente tiene instalado y registrado ese OCX o lo tienes
junto con el ejecutable.


"Dario" <dar...@hotmail.com> escribi� en el mensaje
news:ODDheQx%23JHA...@TK2MSFTNGP02.phx.gbl...

Dario

unread,
Jul 2, 2009, 9:47:02 AM7/2/09
to

Edwin perdon por mi ignorancia total, pero que ocx, no es un servicio de
Scripting.??? del Xp o Vb????

--
Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar

"Edwin Duran" <Edwin_...@hotmail.com> escribi� en el mensaje
news:eL4lcax%23JHA...@TK2MSFTNGP05.phx.gbl...

Dario

unread,
Jul 2, 2009, 10:58:32 PM7/2/09
to

Revisando seria el msscript, que en todo caso esta tambien en el xp del
cliente...

--
Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar

"Dario" <dar...@hotmail.com> escribi� en el mensaje
news:%23s5ottx%23JHA...@TK2MSFTNGP03.phx.gbl...

Tommy Alfaro

unread,
Jul 3, 2009, 3:59:02 PM7/3/09
to
Cual es el error que le da?

Dario

unread,
Jul 3, 2009, 7:10:37 PM7/3/09
to

Codigo error OLE 0x80070002 codigo de estado Com desconocido

--
Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar

"Tommy Alfaro" <tal...@simosa.com> escribi� en el mensaje
news:12600a9c-abda-4ac1...@t21g2000yqi.googlegroups.com...

dfoo

unread,
Jul 4, 2009, 7:53:35 AM7/4/09
to

Dar�o:
Creo que es el ampersand dento de las comillas .

Quitale el "&cd" y ponle la variable que contiene la letra del drive
o bien la letra entre comillas.

LOCAL loFSO, loDrive
loFSO = createobject('Scripting.FileSystemObject')

loDrive = loFSO.GetDrive("e")

x = lodrive.driveletter

unid=IIF(loDrive.IsReady,'SI','NO')

Saludos


"Dario" <dar...@hotmail.com> escribi� en el mensaje
news:ODDheQx%23JHA...@TK2MSFTNGP02.phx.gbl...

Dario

unread,
Jul 4, 2009, 8:28:49 AM7/4/09
to
Si fuera el & en mi pc daria error o no funcionaria, pero funciona :(,
probare nuevamente gracias...

--
Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar

"dfoo" <daniel...@yahoo.com.ar> escribi� en el mensaje
news:%233suR4J$JHA....@TK2MSFTNGP05.phx.gbl...

0 new messages