Hi Mark, of course you are right - I cannot Form like in vb6 and dont try this. I just tried scanner = CreateObject("Twizlib.Twiz") > > scanner.AutoFeeder = True > > scanner.MaxImages = 3 > > scanner.ShowUI = False > > scanner.Resolution = 300 > > scanner.AcquireToFile("c:\test.jpg")
I will test your suggestion: SET scanner = createObject("TwizLib.Twiz") this might be a starting point. Thanks! Franz -------- Original Message -------- Subject: Re: using an ActiveX (twiz32.ocx) from runrev by vbs (25-Sep-2008 11:05) From: Mark Schonewille <[EMAIL PROTECTED]> To: [EMAIL PROTECTED] > Hi Franz, > > I don't think you can use sub routines in the do command. Each time > when you call form_load, you'll probably have to rewrite the entire > function verbose. > > Sometimes, I have to experiment a bit with the createObject function > to make it work. For example, adding "set' in front of the scanner > variable might work: > > set scanner = createObject("TwizLib.Twiz") > > -- > Best regards, > > Mark Schonewille > > Economy-x-Talk Consulting and Software Engineering > http://economy-x-talk.com > http://www.salery.biz > Dutch forum: http://runrev.info/rrforum/ > > Benefit from our inexpensive hosting services. See http://economy-x-talk. > com/server.html > for more info. > > On 25 sep 2008, at 10:47, [EMAIL PROTECTED] wrote: > > > Hello, > > > > Is it possible and how can we use activeX with the alternateLanguage > > > Function of runrev by the way of visual basic script vbs? I do know > how > > to run Excel or Word from runrev in this way (using COM and > > createObject), but not how to use an ocx. > > > > Any idea or suggestions? > > > > I use an ocx (Olympus Twain Wizard) for administration of a scanner > on > > windows (TWAIN). This works in Visual Basic 6.0 without any user > > > interaction (in this case Scan if the Form opens:) > > > > Private Sub Form_Load() > > Form1.Twiz1.AutoFeeder = True > > Form1.Twiz1.ShowUI = False > > Form1.Twiz1.Resolution = 300 > > Form1.Twiz1.AcquireToFile ("c:\test.jpg") > > End Sub > > > > Now I try to do this with vbs in runrev (but I do not know whether > > this is possible). > > > > I tried > > > > > > scanner = CreateObject("Twizlib.Twiz") > > scanner.AutoFeeder = True > > scanner.MaxImages = 3 > > scanner.ShowUI = False > > scanner.Resolution = 300 > > scanner.AcquireToFile("c:\test.jpg") > > > > > > > > But the ocx seems not to be accessible by createObject ("The ActiveX > > > object can not produce a new object"). To be shure: But this error > > even occurs when the name of the class is wrong. > > > > The Typelib ID of this ocx is > > > > {A96AC4E1-6EBF-11D0-AA7C-00608CC9A71F} > > > > the most importent methods and settings are > > ShowUI = False > > AcquireToFile("c:\test.jpg") > > > > Regards > > Mit freundlichen Grüßen > > Franz Böhmisch > > _______________________________________________ > use-revolution mailing list > use-revolution@lists.runrev.com > Please visit this url to subscribe, unsubscribe and manage your > subscription preferences: > http://lists.runrev.com/mailman/listinfo/use-revolution > > To: use-revolution@lists.runrev.com _______________________________________________ use-revolution mailing list use-revolution@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-revolution