Jump to content
Sign in to follow this  
KXM

COM problems.

Recommended Posts

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!

Share this post


Link to post
Share on other sites

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


Free Internet Tools: DebugBar, AutoIt IE Builder, HTTP UDF, MODIV2, IE Developer Toolbar, IEDocMon, Fiddler, HTML Validator, WGet, curl

MSDN docs: InternetExplorer Object, Document Object, Overviews and Tutorials, DHTML Objects, DHTML Events, WinHttpRequest, XmlHttpRequest, Cross-Frame Scripting, Office object model

Automate input type=file (Related)

Alternative to _IECreateEmbedded? better: _IECreatePseudoEmbedded  Better Better?

IE.au3 issues with Vista - Workarounds

SciTe Debug mode - it's magic: #AutoIt3Wrapper_run_debug_mode=Y Doesn't work needs to be ripped out of the troubleshooting lexicon. It means that what you tried did not produce the results you expected. It begs the questions 1) what did you try?, 2) what did you expect? and 3) what happened instead?

Reproducer: a small (the smallest?) piece of stand-alone code that demonstrates your trouble

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites

@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?

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...