Not able to open word doc using _WordCreate

[HarshChaturvedi]

I am a newbie to AutoIt , please forgive my ignorance . What i want to do is to open a word Document residing on a pen drive as soon as the pen drive is inserted , i am doing the following:

#include <Word.au3>

$DBT_DEVICEARRIVAL = "0x00008000"

$WM_DEVICECHANGE = 0x0219

GUICreate("")

GUIRegisterMsg($WM_DEVICECHANGE , "MyFunc")

Func MyFunc($hWndGUI, $MsgID, $WParam, $LParam)

 If $WParam == $DBT_DEVICEARRIVAL Then

Global $WordApp = _WordCreate("F:testfile.docx" , 1)

 EndIf

EndFunc

While 1

   $GuiMsg = GUIGetMsg()

WEnd

 

 

What is it that i am doing wrong . Please Help 

[Melba23]

HarshChaturvedi,

Welcome to the AutoIt forum.

But please pay attention to where you post - the "Examples" section where you started this thread is clearly marked: "This is NOT a general support forum!". I have moved the thread for you, but would ask you to be more careful in future.

M23

[water]

You need to add some error checking to your code! Is MyFunc called at all? Does your Pen always get drive letter "F:"? Does _WordCreate return any errors?

[HarshChaturvedi]

Also when i am running the same script in AutoIT Debugger everything is working fine 

[HarshChaturvedi]

HarshChaturvedi,

Welcome to the AutoIt forum.

But please pay attention to where you post - the "Examples" section where you started this thread is clearly marked: "This is NOT a general support forum!". I have moved the thread for you, but would ask you to be more careful in future.

M23

Sorry for the ignorance and thanks for moving it . Will be more careful next time 

[HarshChaturvedi]

You need to add some error checking to your code! Is MyFunc called at all? Does your Pen always get drive letter "F:"? Does _WordCreate return any erro 

Hi , Added some error handling it says : Error Number 800401E3 Win Description: Operation Unavailable Script Line 155

[kylomas]

HarshChaturvedi,

The code you posted fails due to obj create failure.  I'm not sure why.  When you move the WORD func outside of MyFunc it works.  This is a better practice anyway as you want to exit registered functions as soon as possible.  I got it to run like this...

#include <Word.au3>

$DBT_DEVICEARRIVAL = "0x00008000"
$WM_DEVICECHANGE = 0x0219
local $open

GUICreate("")

GUIRegisterMsg($WM_DEVICECHANGE, "MyFunc")

Func MyFunc($hWndGUI, $MsgID, $WParam, $LParam)

    If $WParam == $DBT_DEVICEARRIVAL Then
        $open = true
    EndIf

EndFunc   ;==>MyFunc

While 1

    $GuiMsg = GUIGetMsg()

    if $open then
        Global $WordApp = _WordCreate("j:\testfile.doc", 1)
    endif

    if $open then $open = false

WEnd

note - my thumb drive was device "J:"

kylomas

edit: grammar

Edited October 18, 2013 by kylomas