|
Well I have been pulling my hair out for ages now trying to work a way around this problem.
My VB code simply gets a row of data from a table an then passes it to my ATL COM which takes one paramter as an array pointer.
I keep getting the Type Mismatch before my COM gets called and this is documented by Microsoft here: http://support.microsoft.com/kb/818982/
<br />
System.Runtime.InteropServices.COMException (0x80020005): Type mismatch.<br />
at Microsoft.VisualBasic.CompilerServices.LateBinding.InternalLateCall(Object o, Type objType, String name, Object[] args, String[] paramnames, Boolean[] CopyBack, Boolean IgnoreReturn)<br />
at Microsoft.VisualBasic.CompilerServices.LateBinding.LateCall(Object o, Type objType, String name, Object[] args, String[] paramnames, Boolean[] CopyBack)<br />
I have all the service packs installed but I still keep getting the error so I can only assume its something Im doing. Can anyone help or suggest a work around ?
VB Snippet
<br />
Dim arrJumpTable As Object<br />
rs = CreateObject("ADODB.Recordset")<br />
rs.open(strSql, my_Conn)<br />
arrJumpTable = rs.GetRows()<br />
rs.Close()<br />
rs = Nothing<br />
<br />
Dim obj As Object<br />
obj = CreateObject("Trader.Mapper")<br />
Call obj.LoadMap(arrJumpTable)<br />
<br />
ATL COM<br />
<br />
STDMETHODIMP CMapper::LoadMap(VARIANT* vptrData)<br />
...<br />
<br />
__interface IMapper : IDispatch<br />
{<br />
<br />
[id(2), helpstring("method LoadMap")] HRESULT LoadMap([in] VARIANT* vptrData);<br />
};<br />
<br />
The array may contain in excess of 5000 entries and needs to be processed fast, hence using C++ for implementing a complex version of Dijkstra's Algorithm which works well in VB but takes around 45 seconds to to run. At the end of the day I need to access this COM object using VBScript fro a web page so the VB snippet above is from the test harness. Im still trying to get my head around ATL COM so its a bit of an uphill struggle at the moment.
I can call up other properties and methods in the COM object ok so I feel sure I have it built right.
I really appreciate any help here.
Thanks, Kess
Trying hard to get it to work 
|
|
|
|
|
how do I use event with Datagridviewcolumn in datagridview control?
can you send me a code project about some event usage with datagridviewcomboboxcolumn?
my email address: sumroitha@yahoo.com
|
|
|
|
|
it have in msdn, search it.
|
|
|
|
|
|
thank for your answer. but I need Datagridview control not Datagrid control.
|
|
|
|
|
I want to put a button in Outlook that saves the users selected emails into a directory. Can anyone point me in the right direction.
|
|
|
|
|
I stole this snippet from a C# forum and converted it into VB. It's a routine for searching files recursively. When i test it however, I get the "Access to the path 'C:\System Volume Information' is denied." error. I've tried the old VB6: On Error Resume Next. Doesn't work thou. Any way to get around it?
Private Sub DirSearch(ByVal sDir As String)
Dim arrLst As New ArrayList
Dim _dir As String
Dim _file As String
Try
For Each _dir In Directory.GetDirectories(sDir)
For Each _file In Directory.GetFiles(_dir, txtFile.Text)
arrLst.Add(_file)
Next
DirSearch(_dir)
Next
Catch ex As Exception
Debug.Print(ex.Message)
End Try
End Sub
Thanks
|
|
|
|
|
Add some try/catch block to your code and handle the exception.
--------------------------------------------------------
My portfolio & development blog
Q:What does the derived class in C# tell to it's parent?
A:All your base are belong to us!
|
|
|
|
|
Well, that's because you don't have enough permission to access that directory. You can just ignore that by moving the Try Block inside the loop, like this :
Private Sub DirSearch(ByVal sDir As String)
Dim arrLst As New ArrayList
Dim _dir As String
Dim _file As String
For Each _dir In Directory.GetDirectories(sDir)
Try
For Each _file In Directory.GetFiles(_dir, txtFile.Text)
Try
arrLst.Add(_file)
Catch ex as IOException
Continue
End Catch
Next
DirSearch(_dir)
Catch ex as IOException
Continue
End Try
Next
End Sub
That should fix it. The Continue statements continue the loop into the next iteration, so that exception should be ignored..
Yuvi Panda T
15 year old Microsoft Student Partner
Blogs at : http://yuvipanda.blogspot.com
|
|
|
|
|
hello everybody.
a simple unsolvable question:
is it possible to emulate a click on the windows taskbar "disconnect" button,so to obtain the corresponding dialog box(e.g. the one in windows xp has got the "Change user" and "Log Off" buttons)?
I ask this because i have gave up hope to find a relative API,like SHShutDownDialog to show the shutdown dialog box..
Can someone please help?
many thanks in advance..
|
|
|
|
|
or at least how to obtain the Logoff button handle to use with "findwindowex" API...
i searched for it with spy++,but no result(at best i found the "All programs" button in Start menu taskbar,but not the Shutdown nore the Logoff one)
help
|
|
|
|
|
no idea?
please please please....
|
|
|
|
|
Is this what you want? taken from Microsoft's Win32 Programmers Reference
--------
The ExitWindows function logs off the current user. All applications must agree to terminate before the user logs off. If any application returns FALSE when it processes the WM_QUERYENDSESSION message, the user is not logged off. If your application handles the WM_QUERYENDSESSION message, you can allow the user to cancel the log-off operation, even if another application or Windows originated the end-session request.
The following example logs off the current user, unless the user clicks the No button in the message box displayed when the application receives the WM_QUERYENDSESSION message.
// Log off the current user.
ExitWindows(0, 0);
----------------
and taken from the APIViewer2004 application (www.apiviewer.de)
Declare Function ExitWindows Lib "user32.dll" ( _
ByVal dwReserved As Int32, _
ByVal uReturnCode As Int32) As Int32
modified 1-Aug-19 21:02pm.
|
|
|
|
|
first of all thanks for your answer...
but sorry,no,it's not what i want.i knew ExitWindows or ExitWindowsEx API function,but i didn't and still don't want to actually logoff the computer,i just want to show the coloured dialog box Windows Xp shows to the user when s/he clicks on the Logoff button on the start menu taskbar.
I hope to make it clearer in this example:ExitWindows also shuts the computer down.So,if i had wanted to do so,i would have used the above-mentioned function:but to show the shutdown dialog box i would instead have used the SHShutdownDialog function(try it in the example i have written below).So,i was searching for a similar api,or whatsoever goals the same result with the logoff dialog box.
example in vb6:
<br />
Private Declare Function SHShutDownDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long<br />
Private Sub Form_Load()<br />
'KPD-Team 1999<br />
'URL: http:
'E-Mail: KPDTeam@Allapi.net<br />
SHShutDownDialog 0<br />
End Sub<br />
-- modified at 4:54 Tuesday 9th May, 2006
|
|
|
|
|
i have finally found this completely-undocumented API function:
Public Declare Function SHLogoffDialog Lib "shell32.dll" Alias "#54" (ByVal hWnd As Integer) As Integer
(of course the integer type is intended for .net,otherwise you should use the long one)
well done!
byeeeeeeee
|
|
|
|
|
Apologies for sending you incorrect data. I mis-understood your requirements. Sorry about that.
Undocumented - many are and Microsoft should consider publishing them and I hear the reasons for not using these as they are unsupported and Microsoft are at liberty to change/remove without regard - I have seen many postings about using undocumented code.
modified 1-Aug-19 21:02pm.
|
|
|
|
|
abbottra don't worry!no problem..
in fact.but they're so useful functions....anyway i didn't know they're free to change them...even if i use them only for a home application,i will bear in mind.
thanks again
|
|
|
|
|
I have a textbox having text in "dd/MM/yyyy" format (eg. 16/05/2006)
How i assing this text to a Date Object?
I am using Date object = format(textbox1.text, "dd/MM/yyyy")
this cause error
|
|
|
|
|
What kind of error? Just saying 'this cause error' does not really help.
PC
|
|
|
|
|
The Format method is used to create a string, not parse it.
Use the DateTime.ParseExact method.
---
b { font-weight: normal; }
|
|
|
|
|
how can i use microsoft flexgrid in vb.net
|
|
|
|
|
|
Hi there,
I have a question concerning the datagridview in vb.net 2005.
Is it possible to change the text-alignment of a certain column in the datagridview? If so, how do I do this?
Thanks!!!
G72360
|
|
|
|
|
|
I have written a program to View a Specific webpage with an option to refresh this site.
Picture of Program Layout
Is there any possible way to Extract the Number Online( ? out of 12 ) to an integer into the program? The page is written in php and is not my own. The variable I am trying to get is under the "Online" Column{1,12 Cell} in Row 2{2,12 Cell}.
Purpose being..
If Online > 1 Then
Scream bloody murder 
End If
This program has NotifyIcon incorporated, so having this hidden and still checking for players would be the ideal goal.
Thank you in advance for any and all help. I appreciate your time in helping me with this matter.
TehCheeze 
-- modified at 6:56 Sunday 7th May, 2006
P.S. -- The html for the WebSite is as follows
<br />
<table width="100%" border=1><br />
<tr><br />
<th>Name</th><br />
<th>Dedicated</th><br />
<th>Password</th><br />
<th>CMaps</th><br />
<th>Time online</th><br />
<th>Map</th><br />
<th>Game Type</th><br />
<th>Teams</th><br />
<br />
<th>Respawn</th><br />
<th>Lives</th><br />
<th>Target</th><br />
<th>Online</th><br />
</tr><br />
<tr><br />
<td><a href="cm://86.137.187.125:41230">Saturn</a></td><br />
<td>Yes</td><br />
<td>No</td><br />
<td>No</td><br />
<br />
<td>61135</td><br />
<td>Temple Dar</td><br />
<td>CTF</td><br />
<td>Yes</td><br />
<td>Normal</td><br />
<td>0</td><br />
<td>100</td><br />
<td>0 / 12</td><br />
</tr><br />
<br />
</table><br />
<p>Note: Temporary page, list function only not worked on layout/visual design yet.</p><br />
<br />
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
