COM problems.

[KXM]

I know I've posted about this before, and hate to keep bothering you folks. I just can't seem to get this one working.

Here's my code in VBS:

dim client 
dim message 

set client = CreateObject( "MeedioClient.MeedioPluginClient" ) 
if client.Connect( "localhost" , 7501 , "" , 0 , 0 ) then 
    set message = client.NewMessage( "system.jump" )
    message.values( "target" ) = "fsmus"
    message.Send 
    WScript.Sleep( 1000 ) 
    client.Flush
end if

and now in au3:

dim $client
dim $message

$client = ObjCreate( "MeedioClient.MeedioPluginClient")
if $client.connect( "localhost" , 7501 , "" , 0 , 0) then
    $message = $client.NewMessage( "system.jump" )
    $message.values( "target" ) = "fsmus"
    $message.Send
    Sleep(1000)
    $client.Flush
endif

The programs built in client tester returns this for the VB script

system.jump

[from:WScript.exe@127.0.0.1 (136) to:0]

target = fsmus

but for au3 it only returns this:

system.jump

[from:autoit3.exe@127.0.0.1 (135) to:0]

Any clues? Or is this not AutoIt's fault?

TIA!

[DaleHohm]

I know I've posted about this before, and hate to keep bothering you folks. I just can't seem to get this one working.

Here's my code in VBS:

dim client 
dim message 

set client = CreateObject( "MeedioClient.MeedioPluginClient" ) 
if client.Connect( "localhost" , 7501 , "" , 0 , 0 ) then 
    set message = client.NewMessage( "system.jump" )
    message.values( "target" ) = "fsmus"
    message.Send 
    WScript.Sleep( 1000 ) 
    client.Flush
end if

and now in au3:

dim $client
dim $message

$client = ObjCreate( "MeedioClient.MeedioPluginClient")
if $client.connect( "localhost" , 7501 , "" , 0 , 0) then
    $message = $client.NewMessage( "system.jump" )
    $message.values( "target" ) = "fsmus"
    $message.Send
    Sleep(1000)
    $client.Flush
endif

The programs built in client tester returns this for the VB script

system.jump

  [from:WScript.exe@127.0.0.1 (136) to:0]

  target = fsmus

but for au3 it only returns this:

system.jump

  [from:autoit3.exe@127.0.0.1 (135) to:0]

Any clues? Or is this not AutoIt's fault?

TIA!

<{POST_SNAPBACK}>

A couple of questions...

What is MeedioClient? If it was needed for testing, how could it be obtained?

Are you concerned about the act that it returned (135) instead of (136) or taht it didn't return the "target = fsmus" - or both?

This is probably something for Sven, but the answers to those questions will probably be needed.

Dale

[SvenP]

I know I've posted about this before, and hate to keep bothering you folks. I just can't seem to get this one working.

Here's my code in VBS:

....

The programs built in client tester returns this for the VB script

system.jump

  [from:WScript.exe@127.0.0.1 (136) to:0]

  target = fsmus

but for au3 it only returns this:

system.jump

  [from:autoit3.exe@127.0.0.1 (135) to:0]

Any clues? Or is this not AutoIt's fault?

TIA!

<{POST_SNAPBACK}>

KXM,

Can you check out if it works when you change the line:

$message.values( "target" ) = "fsmus"

into:

$message( "target" ) = "fsmus"

(I thought I made that working again in AutoIt after your previous post in: http://www.autoitscript.com/forum/index.php?showtopic=10733 )

I can't test this myself because I don't have the Meedio software.

Regards,

-Sven

[KXM]

@Dale: Just the target=fsmus, I didn't even notice the other one untill now. MeedioClient is the COM/API part of a popluar Home Theater software (formerly myHTPC) It's used to organize, and display all of you media in a TV friendly format. Its kinda like Windows Media Center. But much more powerful. It has about 200 plugins.

@SvenP: $message( "target" ) = "fsmus" actully hasn't worked. But after you were kind enought to explain COM default values, I just started using .values

I didn't want to keep bothering you with a bug that had little to do with AU3 real function (autiomation) and more to do with my lack of understanding of VB.

I've tried to solve this myself, but just can't seem to.

Any ideas?