VB to Python

[Aleksandar Cikota]

Hi all,

Can someone translate the VB code to Python?

VB code:

Dim chsr as New DriverHelper.Chooser
chsr.DeviceType = "Telescope"
scopeProgID = chsr.Choose(scopeProgID)
Set scope = CreateObject(scopeProgID)
scope.Connected = True

For your prompt reply, I say thank you in advance.

Best regards,
Aleksandar

[Gregor Horvath]

Aleksandar Cikota schrieb:

Can someone translate the VB code to Python?

VB code:

Dim chsr as New DriverHelper.Chooser
chsr.DeviceType = "Telescope"
scopeProgID = chsr.Choose(scopeProgID)
Set scope = CreateObject(scopeProgID)
scope.Connected = True

(untested; late binding):

import win32com.client

chsr = win32com.client.Dispatch("DriverHelper.Chooser") #you may have to
choose the ProdID of the class from the registry here

chsr.DeviceType = "Telescope"
scopeProgID = chsr.Choose(scopeProgID)
scope = win32com.client.Dispatch(scopeProgID)
scope.Connected = True
--
Mit freundlichen Grüßen,
Ing. Gregor Horvath, Industrieberatung & Softwareentwicklung
Mobil: [phone]
Fax: [phone] http://www.gregor-horvath.com


--
Mit freundlichen Grüßen,
Ing. Gregor Horvath, Industrieberatung & Softwareentwicklung
http://www.gregor-horvath.com

[Aleksandar Cikota]

Vielen Dank. Es funktioniert.
Mit freundlichen gruessen,
Aleksandar Cikota
"Gregor Horvath" <g.*******@gmx.at> wrote in message
news:e1**********@newsreader1.utanet.at...

Aleksandar Cikota schrieb:

Can someone translate the VB code to Python?

VB code:

Dim chsr as New DriverHelper.Chooser
chsr.DeviceType = "Telescope"
scopeProgID = chsr.Choose(scopeProgID)
Set scope = CreateObject(scopeProgID)
scope.Connected = True

(untested; late binding):

import win32com.client

chsr = win32com.client.Dispatch("DriverHelper.Chooser") #you may have to
choose the ProdID of the class from the registry here

chsr.DeviceType = "Telescope"
scopeProgID = chsr.Choose(scopeProgID)
scope = win32com.client.Dispatch(scopeProgID)
scope.Connected = True
--
Mit freundlichen Grüßen,
Ing. Gregor Horvath, Industrieberatung & Softwareentwicklung
Mobil: [phone]
Fax: [phone] http://www.gregor-horvath.com


--
Mit freundlichen Grüßen,
Ing. Gregor Horvath, Industrieberatung & Softwareentwicklung
http://www.gregor-horvath.com