Xiangyang Liu 刘向阳 - Professional Profile

Xiangyang Liu 刘向阳26-Apr-04 2:47

26-Apr-04 2:47

In this case, the method "OpenConnection" returned a SapConnection object (VT_DISPATCH, an IDispatch pointer). You can use the returned "object" with another instance of the XYDispDriver class, like the following:

<br />
VARIANT* pOutput = disp.InvokeMethod("OpenConnection","My Info", true, true);<br />
XYDispDriver disp2;<br />
if(disp2.Attach(pOutput->pdispVal)!=false)<br />
{<br />
// call methods of the returned object<br />
}<br />

The Attach method of XYDispDriver allows you to use an existing IDispatch pointer, it is the same as the CreateObject method except that it does not create a new com object (it only attaches the existing com object to the XYDispDriver instance).

Good luck.

brafalowski26-Apr-04 2:56

brafalowski

26-Apr-04 2:56

Thank you very much! I'll give it a try right now.

Brian

brafalowski26-Apr-04 3:16

brafalowski

26-Apr-04 3:16

Hi Xiangyang Liu,

Hopefully one last question. I was successful with the code you mentioned. One of the "properties" of that Object are defined as follows:

/////////////////////////////////////////////////////////////////////////////
// CSapConnectionTarget properties

CString CSapConnectionTarget::GetDescription()
{
CString result;
GetProperty(0x80ea, VT_BSTR, (void*)&result);
return result;
}

In the DEBUG Output on attach I see:

11: DispID = 33002
VarName = Description
VarKind = VAR_DISPATCH
VarType = 8

VarType 8 looks like a VT_BSTR!

I run this code ....
VARIANT* pProperty = connection.GetProperty("GetDescription");

but I get 0x00000000 (NULL) for pProperty. How would I get at that variable "VarName = Description"?

Thanks you so, so much.

Brian

Xiangyang Liu 刘向阳26-Apr-04 3:23

26-Apr-04 3:23

Wrong property name, what you need is GetProperty("Description") instead of GetProperty("GetDescription").

terryhutt1959@hotmail.com

VBThread

terryhutt1959@hotmail.com16-Mar-04 7:07

16-Mar-04 7:07

Hi, I'm running windows XP Pro and I've registered VBThread.dll in COM+.
When I run the VBThreadTest program I get 'Automation Error' on the line 'Set vbThreadObj = New VBTHREADLib.ThreadObj' in the form load event.

If I remove 'WithEvents' from the vbThreadObj declaration I do not get this error (but of course I get no completion event raised) and the program works correctly.

I recompiled VBThread.dll and re-registered it but it didn't help.

Can you think of anything I did wrong?
Thanks

Terry Hutt
terryhutt1959@hotmail.com

Re: VBThread

terryhutt1959@hotmail.com16-Mar-04 7:32

terryhutt1959@hotmail.com

16-Mar-04 7:32

I figured it out...

I destroyed the COM+ package and registered the dll with regsvr32. All is now working.

Great job on the article.
Terry Hutt

Re: VBThread

Xiangyang Liu 刘向阳16-Mar-04 8:41

16-Mar-04 8:41

terryhutt1959@hotmail.com wrote:
I destroyed the COM+ package and registered the dll with regsvr32. All is now working.

I just love users who can figure out problems themselves. Wink | ;)

Thanks for the comment, by the way.

Connection string

dodgemaster29-Dec-03 2:45

dodgemaster

29-Dec-03 2:45

Hi.

I need some help with my connection string. Im trying to connect to a password protected MS Access database. This is my connection string:

"Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin; Password=whatever;Data Source=E:\\BN\\test\\ht.mdb;"

When I use this connection string I get the following error:
"System.Data.OleDb.OleDbException: Cannot start your application. The workgroup information file is missing or opened exclusively by another user. at System.Data.OleDb.OleDbConnection.ProcessResults(Int32 hr) at System.Data.OleDb.OleDbConnection.InitializeProvider() at System.Data.OleDb.OleDbConnection.Open() at webchange.attachme.InsertRow(String myConnectionString, String myInsertQuery) at webchange.attachme.Upload_ServerClick(Object sender, EventArgs e)"

The thing is... when i remove the password in the database and use this connection string: "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\\BN\\test\\ht.mdb;" .... it works fine. I've allready tried all the workarounds i've found on Microsofts pages (http://support.microsoft.com/default.aspx?scid=kb;en-us;316675) but i allways get the same error...

Any ideas?

tnx in advance
-dodge

Re: Connection string

Xiangyang Liu 刘向阳2-Jan-04 4:29

2-Jan-04 4:29

Here is the solution to the problem you have, it took me a while to figure it out.

In your connection string, you need to change the Password string to Jet OLEDB:Database Password, like the following:

<br />
Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Jet OLEDB:Database Password=123456;Data Source=E:\\BN\\test\\ht.mdb<br />

It worked for me.

How can I receive the event

Re: Connection string

dodgemaster4-Jan-04 19:20

dodgemaster

4-Jan-04 19:20

Tnx alot! Works fine. It might have taken you a while to figure out, but it sure would have taken me forever Smile | :)

chaocai16-Dec-03 14:50

Re: How can I receive the event

16-Dec-03 14:50

To use your class ,how can I receive the events fired by COM

Xiangyang Liu 刘向阳16-Dec-03 20:24

16-Dec-03 20:24

chaocai wrote:
To use your class ,how can I receive the events fired by COM

To receive com event, you need to set up the event sink and connect it to the outgoing event interface in the com object.

If you are developing a GUI application (MFC or VB), then using com and receiving com event is easy, you don't need to use my class at all.

If you are familiar with ATL or want to learn it, you don't need to use my class either.

To use the XYDispDriver class to handle com event, you need to implement the event interface in another com object, please read Handling COM Events in a Console Application for more details. This is definitely not the easiest way for beginners.

Good luck.

Some question about your GetObject

chaocai9-Dec-03 14:03

Re: Some question about your GetObject

9-Dec-03 14:03

I have try what you said,but it did not run.
I think your GetObject method must invoke the CreateInstanceEx not the CreateInstance.
MSDN say CreateInstance can only create a local instance of the class.
I do not know much about how to use the CreateInstanceEx.How to change your program?

Thank a lots

Xiangyang Liu 刘向阳10-Dec-03 23:53

10-Dec-03 23:53

Thanks for your comment and suggestion.

Yes, you are right. I have modified the class XYDispDriver to create com object on remote machines. My article and code will be updated. You can down load the new files at the link below.

The CreateObject method has been updated to include a new parameter strServerName. To create a com object on a remote server, you need to do the following:

1. Register and configure (using com+) the com object on the remote machine.
2. Export and import the com object (using com+) to the local machine.
3. Call the CreateObject method as follows:

XYDispDriver disp;
disp.CreateObject("MyProgId", CLSCTX_ALL, "MyServerName");

Good luck.

XYDispDriver.zip (7.2 Kb)

Re: Some question about your GetObject

chaocai11-Dec-03 16:33

Re: Some question about your GetObject

11-Dec-03 16:33

Thanks a Lot!

Xiangyang Liu 刘向阳11-Dec-03 21:00

11-Dec-03 21:00

Just when you think the work is done ...

I introduced a new bug in the code. The following line in CreateObject

m_hRet = ::CoCreateInstanceEx(clsid,NULL,strServerName==NULL?dwClsContext:NULL,&svrinfo,1,&multiqi);

should be changed to

m_hRet = ::CoCreateInstanceEx(clsid,NULL,dwClsContext, strServerName==NULL?NULL Frown | :(

amp;svrinfo),1,&multiqi);

Sorry for the inconvenience. Cry | :((

I will correct the problem as soon as possible.

Re: New Topic

DJ_Catboy10-Dec-03 3:37

DJ_Catboy

10-Dec-03 3:37

Hi,

I have just read your article "A simple .NET TCL Socket Component" - XYNetSocket. I am relatively new to .NET programming, I just wondered why did you write some of this in C# and some in VB.NET? Is there a reason or is it just the way it happened....? I thought that all of the languages in .NET were variations around the same thing i.e. not one was better or worse to use than the other....?

Kind regards,
Dom

Re: New Topic

Xiangyang Liu 刘向阳10-Dec-03 8:23

10-Dec-03 8:23

DJ_Catboy wrote:
I just wondered why did you write some of this in C# and some in VB.NET? Is there a reason or is it just the way it happened....?

It is just the way it happened, no special reason (there was a reason but it is no longer valid). Thanks for your interest.

Question about XYDispDriver

chaocai8-Dec-03 22:46

Re: Question about XYDispDriver

8-Dec-03 22:46

How to change the programme to make it can create an instance of the class on remote machine.

thanks a lot

Xiangyang Liu 刘向阳9-Dec-03 2:55

9-Dec-03 2:55

chaocai wrote:
How to change the programme to make it can create an instance of the class on remote machine.

I assume what you want to do is, use XYDispDriver to create com object remotely. You need to be familiar with COM+ (or DCOM) in order to do this.

1. First, the com dlll or exe you want to use has to be registered with COM+ as "server application" on the remote machine.

2. Secondly, you need to create a type library by exporting the server application from the remote machine. The type library should be imported on your local machine (where code using XYDispDriver runs).

3. Finally, call the CreateObject method of the XYDispDriver class. The com object created will live on the remote machine.

Note that you cannot do this for all com objects and it all depends on how your com component is constructed.

Good luck.

lasttool4-Dec-03 6:30

lasttool

4-Dec-03 6:30

Attempted to run a vbscript using xyntservice and got the following error message:

Failed to start program 'vbcode3.vbs', error code = 2

When I code the ini file to look like the following:

[Settings]
ServiceName = XYNTService
proccount = 1
CheckProcess = 20
[Process0]
CommandLine = Wscript vbcode3.vbs
workingDir = c:\
userinterface = yes
Restart = no

The service starts the process "Wscript" but does not run the program associated with it. Any ideas on how to get the VBScript code to run?

Thanks

Al Olson D'Oh! | :doh:

Xiangyang Liu 刘向阳4-Dec-03 7:30

4-Dec-03 7:30

Ok, this is an easy one. The "error code = 2" means the system cannot find your file, in this case it is the vb script file that it can't find.

You need to change the command line in your XYNTService.ini file to something like the following:

CommandLine=wscript c:\mydir\vbcode3.vbs

Good luck.

lasttool5-Dec-03 2:22

lasttool

5-Dec-03 2:22

Thanks for the suggestion, however this doesn't work either. When I try it WScript becomes a started process but it does not run the program VBCode3.vbs. I can see WScript in the process list but it is not getting any CPU time nor is the program accessing any of the data. My vbscript code is suppose to access the domain coontroller on the network and when I run this from the command line with the following command it works great:

Wscript VBCode3.vbs

Any thoughts?

Thanks

al
D'Oh! | :doh:

Xiangyang Liu 刘向阳5-Dec-03 6:07

5-Dec-03 6:07

This time it might be a different problem. Please check the XYNTService.log file again, if it no longer generates the "Error code = 2" error, then the previous problem was fixed.

If the above is true, the new problem could be a "resource" issue. This is the most typical problem for an app to fail when started by a service. Basically, XYNTService is using the "Local System" account by default, it does not have access to many resources on the network, which may include the "domain controller". What you can do is reconfigure the service to run under your own account (or another domain account that has the appropriate rights). The reconfiguration process is already described in my article in detail (see the FAQ section).

Good luck.