User-defined type not defined ?

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ Visual Basic
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - Telnet? Hello, Trying to implement telnet into my vb6 app and I guess it's not as easy as opening a tcp/ip connection on port 23. Is there a sample app somewhere that implements telnet in vb? Or at least a low-cost 3rd party component? Thanks Tag: User-defined type not defined ? Tag: 597825
  - 2
    - error checkbox.value = 1 in form load Why would this cause an error in the form load event: If btBrowserFont = 8 Then chkBox(2).Value = 0 Else 'this causes an error when in the Load form event !! chkBox(2).Value = 1 End If There are 2 other checkboxes in the same control array that have no problem with this. RBS Tag: User-defined type not defined ? Tag: 597812
  - 3
    - Toolkit for EDI? I'm looking for a VB6 toolkit to do EDI 810 (invoices). Any suggestions? -John Tag: User-defined type not defined ? Tag: 597809
  - 4
    - Weird ADO error, any ideas? Hello, I have an application that has been running fine for ages, but has suddenly started generating a weird error. I grab hold of an ADO recordset, and loop through it. For some reason, the MoveNext method of the recordset fails on some records, giving the error -2147467259 "A string literal was not closed." When this happens, the program is stuck as it cannot move to the next record, thus making any subsequent data impossible to access. Now I am completely at a loss as to what this means. How can ... rs.MoveNext generate such an error. I couldn't find anything remotely useful on MSDN, nor elsewhere. Anyone any ideas? TIA -- Alan Silver (anything added below this line is nothing to do with me) Tag: User-defined type not defined ? Tag: 597778
  - 5
    - Problem getting screen controls to to populate I am having a problem getting my VB app to update controls on a dialog screen. I can only get it to work if I call the MSGBOX function anytime after I call my custom dialog. I have a dialog screen w/several text boxes. The following "code" is what occurs in the SUB. The MSGBOX call causes the code to work. If I comment out the MSGBOX line and do nothing else, the text box controls will not update. Is there something that I need to do in my custom dialog boxes, or when calling a custom dialog box, that will make the following code work without calling up a MSGBOX? Thoroughly confused... --Michael private sub dlg_Click ... inside my custom dialog data entry screen... MyFindDlg.Show vbShowModal MSGBOX "Test" data.recordset.findnext( "<Criteria>" ) mystruct.field1 = data.recordset.field("field1") mystruct.field2 = data.recordset.field("field2") mystruct.field3 = data.recordset.field("field3") tbf1.text = mystruct.field1 tbf2.text = mystruct.field2 tbf3.text = mystruct.field3 End Sub Tag: User-defined type not defined ? Tag: 597760
  - 6
    - Change Data environment connection string at runtime Hi, Is it possible to change the DataEnvironment connection string at runtime ? Thanks Aoued Bettahar Tag: User-defined type not defined ? Tag: 597757
  - 7
    - Calling a web service from VB6 Hello, Can someone tell me if it is possible to call a web service in VB6? I'm guessing that it can be done using a COM object? Can someone please give me a quick overview of which object to use? Thanks Tag: User-defined type not defined ? Tag: 597756
  - 8
    - Common Dialog loses focus I haven't been able to find the answer to this question on the web, so I'm posting it even though it may have already been answered. My understanding is that Common Dialog should open modal (Open dialog, for instance), but it's easy to switch to another window and then switch back to the form that launched the dialog from the Windows task bar, but the dialog won't get the focus, the form will. Consequently, if you do ALT+F4, the form will close but the dialog will linger on causing all kinds of havoc depending on what your program does. Is there a way to make the common dialog modal just like it should be? To reproduce, create a form with a command button and a common dialog and add this code: Private Sub Command1_Click() CommonDialog1.ShowOpen End Sub Once the Open dialog opens, click on the form in the Windows task bar (you may have to move the Open dialog to see that the form got the focus) and then do ALT+F4. Tag: User-defined type not defined ? Tag: 597753
  - 9
    - Change the working dir (App.Path) when debuging Hi, I'm working with some VB 6.0 Dlls. Those libraries are invoked by another COM+ library. My source files are organized by library, but all of them compile to a same common location. In the common location are some configuration files that are accessed with app.path.... When the application run alone, from the executables, everything is fine. When I try to debug it, the app.path changes from my common folder to the one where source files are. Is there any way to tell VB which is the working folder (the common folder) in order to find the configuration files? The workaround is copying the configuration files to every source file folder, but I'm trying to avoid it. Thanks in advance LucacC Tag: User-defined type not defined ? Tag: 597750
  - 10
    - StrConv Hi In VB6 I used the function StrConv(Text, vbUnicode) to convert a string to unicode. Is there a function in .Net available which do the same (StrConv in .NET do not support unicode) Thanks alot Nijazi halimaji Tag: User-defined type not defined ? Tag: 597746
  - 11
    - Floyd-Warshall Algorithm Hi all, Does the algorithm return all paths from a starting node to an end node and is there an implementation in VB6? Thanks, Ivan Tag: User-defined type not defined ? Tag: 597727
  - 12
    - Handling nominally identical DLLs Hi, I have two ActiveX DLL files created with the same VB6 code, but referencing a different AutoCAD DLL. The initial project was written and tested, then the project was copied and renamed, the different AutoCAD DLL attached and my second DLL built to a separate name.. When I register the two DLLs with regsvr32 the second one registered overwrites the first registration and only the second is visible from the DLL list in the projects where I need to use them. Can anyone offer any explanations and provide suggestions on how to overcome the problem. I need to have both available on the same computer. -- Laurie Comerford CADApps www.cadapps.com.au Tag: User-defined type not defined ? Tag: 597726
  - 13
    - make an activex control safeforscripting and SafeForInitializing I try to use the cmd line from the article http://support.microsoft.com/kb/q182598/: MKTYPLIB.EXE Objsafe.odl /tlb objsafe.tlb and I get the following error: fatal error M0006: unable to pre-process input file I just need to make an activex control safe for scripting and and SafeForInitializing. Can you help me TNX Leeor Tag: User-defined type not defined ? Tag: 597725
  - 14
    - Showing full SQL Hi there I am running some code in Access and I am getting an error in the SQL for the query definition. I have set a breakpoint and when I take the cursor over the vaiiable I can only see part of the SQL. How can I display the full SQL for my query to allow me to find the error. I am not a VB programmer so there could well be a very simple method of showing the code. Thanks in advance for any help Graham Tag: User-defined type not defined ? Tag: 597724
  - 15
    - Mixer API Hi group I wonder is there any way for knowing when the volume line is changed out side of the program,I'm working with MixerAPI in order to let the user to change the MasterVolume line and WaveLine from my program but I don't know how can I update the slider when user changes the volume line out side my program? is there any callback function or anything else? Regards Tag: User-defined type not defined ? Tag: 597716
  - 16
    - Text box with scroll bar has a hole Hi group what is the solution to cover the hole in the left or right cornet of a text box which has scroll bars I mean when you change the RightToLeft property a hole will be appeared in the left down corner of that control so how this "hole" should be covered? Regards Tag: User-defined type not defined ? Tag: 597715
  - 17
    - to Tony Proctor about my last week post(Err object) Hi Tony Well thanx for your answers but there's another situation here is the scenario: I have a function which checks the error number and return another custom error which I defined which is a little bit more general. In my error handling section I call this function in order to check for certain error numbers in order to translate them so if you said that I should not change the Err properties then how can I raise this custom error in error handling section? should I use err.Raise in Error handling ???? Tag: User-defined type not defined ? Tag: 597714
  - 18
    - Rows & Columns A general question please: In arrays, why are rows listed first and then columns m(y, x) instead of columns and rows as in Cartesian Coordinate System m(x, y)? Any idea why it might have been designed this way? -- http://www.dennisys.com/ Tag: User-defined type not defined ? Tag: 597713
  - 19
    - Is that my code problem or not? Hello, I am using standard Windows functions to get modem capabilties. I do not have problem displaying them in English Windows, however when the user have Arabic, Chinese or another Windows version the display is not as expected to be. For example display looks like that: ProviderName = "ny Service Provider for Universal Modem Driver|d|e|r| |f|o|r|" LineName = "Fax Modem||a| |F|a|x| |M" or ProviderName = "3 Telephony Service Provider||o|n|y| |S|e|" LineName = "n|e||||||" Is it my code wrong or the modem's manufacturer? The code I am using: Type LINEDEVCAPS dwTotalSize As Long dwNeededSize As Long dwUsedSize As Long dwProviderInfoSize As Long dwProviderInfoOffset As Long dwSwitchInfoSize As Long dwSwitchInfoOffset As Long dwPermanentLineID As Long dwLineNameSize As Long dwLineNameOffset As Long dwStringFormat As Long dwAddressModes As Long dwNumAddresses As Long dwBearerModes As Long dwMaxRate As Long dwMediaModes As Long dwGenerateToneModes As Long dwGenerateToneMaxNumFreq As Long dwGenerateDigitModes As Long dwMonitorToneMaxNumFreq As Long dwMonitorToneMaxNumEntries As Long dwMonitorDigitModes As Long dwGatherDigitsMinTimeout As Long dwGatherDigitsMaxTimeout As Long dwMedCtlDigitMaxListSize As Long dwMedCtlMediaMaxListSize As Long dwMedCtlToneMaxListSize As Long dwMedCtlCallStateMaxListSize As Long dwDevCapFlags As Long dwMaxNumActiveCalls As Long dwAnswerMode As Long dwRingModes As Long dwLineStates As Long dwUUIAcceptSize As Long dwUUIAnswerSize As Long dwUUIMakeCallSize As Long dwUUIDropSize As Long dwUUISendUserUserInfoSize As Long dwUUICallInfoSize As Long MinDialParams As LINEDIALPARAMS MaxDialParams As LINEDIALPARAMS DefaultDialParams As LINEDIALPARAMS dwNumTerminals As Long dwTerminalCapsSize As Long dwTerminalCapsOffset As Long dwTerminalTextEntrySize As Long dwTerminalTextSize As Long dwTerminalTextOffset As Long dwDevSpecificSize As Long dwDevSpecificOffset As Long dwLineFeatures As Long mem As String * 2048 ' Added by Jack End Type Public Const LINEDEVCAPS_FIXEDSIZE = 240 Public Function rlineGetDevCaps(Line As Long) As LINEDEVCAPS Dim b As LINEDEVCAPS b.dwTotalSize = LINEDEVCAPS_FIXEDSIZE + 2048 rtn = lineGetDevCaps(hTapi, Line, m_APIversions(Line), m_Extversions(Line), b) ProviderName = GetVarInfo(Clean(b.mem), (b.dwProviderInfoOffset - LINEDEVCAPS_FIXEDSIZE) + 1, b.dwProviderInfoSize - 1) LineName = GetVarInfo(Clean(b.mem), (b.dwLineNameOffset - LINEDEVCAPS_FIXEDSIZE) + 1, b.dwLineNameSize - 1) End Function Public Function GetVarInfo(data As String, Offset As Long, Length As Long) As String Dim strTemp As String On Error GoTo Error GetVarInfo = Mid(data, Offset, Length) Error: End Function I appreciate your comments. Jack Tag: User-defined type not defined ? Tag: 597711
  - 20
    - runtime error 429 Have an ActiveX dll compiled with VB6. It simply is some code that loads a VB form in Excel and this works very well. The trouble is I get an error 429 runtime error, ActiveX component can't create object when the dll is first used to load the form. The strange thing is that another .dll file that was compiled a bit earlier runs fine, despite there being no substantial difference in the code, only some very minor adjustments to the the controls in the form. This file has the same name and I copied it to the same location, overwriting the trouble-some file. I think it somehow has to do with the registration of the dll in the registry, but I can't pinpoint the exact problem. Thanks for any advice with this. RBS Tag: User-defined type not defined ? Tag: 597703
  - 21
    - Help with opening a exe file from a command button I am new to VB and have designed a form as a "Menu" with several command buttons to open specific program files i.e. exe files, text files etc. can anyone help with some easy code I can use to do this please. I guess what I need is code that would do the same as double clicking on a file to open it. Any help will be much appreciated. -- Kind Regards Mick Tag: User-defined type not defined ? Tag: 597695
  - 22
    - Why would I have to use If X = False, instead of If Not X, where X is Boolean? Using Private Declare Function Process32First Lib "KERNEL32.dll" _ (ByVal hSnapshot As Long, ByRef lppe As PROCESSENTRY32) As Boolean I was using If Not Process32First(hProcessSnap, pe32) Then ' Do whatever Exit Function End If where Process32First(hProcessSnap, pe32) returns True, expecting the code in the If to be skipped. However, the test does not work, instead, I have to use: If Process32First(hProcessSnap, pe32) = False Then ' Do whatever Exit Function End If Since Process32First is typed as Boolean and MSDN indicates that the function does return Boolean, what's going on? See http://msdn.microsoft.com/library/default.asp?url=/library/en-us/perfmon/base/process32first.asp. The corresponding code does work in C++, C# and VB .NET. Tag: User-defined type not defined ? Tag: 597688
  - 23
    - Background behind a form is visible Two users of my VB6 based freeware program Calendar Magic (http://www.stokepoges.plus.com) have reported that there are very narrow horizontal slits below a few command buttons on the main form through which whatever is behind the form on their display is visible. Is this a known problem with an easy fix or does it fall into the realm of quirky rendering by some graphics cards? Any pointers in the right direction will be greatly appreciated. Alex Balfour Tag: User-defined type not defined ? Tag: 597686
  - 24
    - Trouble installing under Win98 List: I'm using VB6-SP5 under WinXP-Pro SP1. We've started deployment at our beta sites and have run into a problem. The installer dies horribly under Win98, asking for a reboot. Trying this at our office (yes, this IS late to start worrying about this) results in a hosed Win98 partition. What should I be looking for as I try to solve this? Any particular WinXP dll's that will trash XP? Thanks. Tag: User-defined type not defined ? Tag: 597682
  - 25
    - Dealing with errors Dear All, What is the most efficient way of handling run-time errors your VB program creates. Is it best to handle the errors with a standard Select case statement on the err.number object in each sub or function or is it, open up a form with the error details and ask the user what has just happened and enter the data into a database for later investigation. I would be interested in what other developers do or whether anyone is aware of a good url that gives examples of dealing with errors. Thanks again. Alastair MacFarlane Tag: User-defined type not defined ? Tag: 597681
- Next
  - 1
    - How to change the default papersize to custom size in VB datarepor I have a Epson LX 300 printer. I want to print a report using VB datareport for which the paper lenght must be 7 inches and paper width 6 inches. But when I print the report, datareport uses the default printer setting i.e., Letter size(8.5 X 11). How can I change the default paper size to custom paper size, programmatically, using VB datareport. Thanks in advance. -- Pijus Tag: User-defined type not defined ? Tag: 597677
  - 2
    - SetFocus Trouble I have a two mshflexgrids on a form along with many textboxes, labels, frames, and a call to SetParent which shows the form's picmain picturebox in a picturebox on the parent form (which remains static and allows the user to switch from form to form - call like: lRet = SetParent(m_childPicMainhWnd, m_mainDisplayhWnd) ) One of the two flexgrids uses the EnterCell event to keep an unregistered user from accessing a grid which is populated on the lost_focus event of a data entry textbox. None of the controls in the grid uses the causesvalidation set to true except the two data-entry textboxes. The one data-entry textbox calls for a numeric value only to cause validation and enable the second textbox for dataentry of a part number, which if correct, is looked up in a database and displayed in the grid with the Entercell event. If the number is only partial, all inventory numbers which qualify as "LIKE" the given part number will appear in the other mshflexgrid for the user to select. My problem is that in spite of a call to setfocus in the lost_focus event of the second textbox, focus is NEVER returned to the first textbox and I am not certain which event to suspect... in short, I don't know where to begin to look for a way to fix the data entry screen to reset the focus to the first textbox. I have even attempted to use an api call to set the focus. This also does not appear to work. Here is the code: DoDataLookup'fills the first grid with information when "LIKE" is used otherwise single item goes to second grid - first grid's name is fgUpdate 'txtSearch is the search textbox... txtSearch(0) is the part entry and txtSearch(1) is for description searching If fgUpdate.Rows = 2 Then 'means only one item found and it was applied to the second grid If Index = 0 Then 'means we applied the find from the item search not the description search SetFocusAPI txtQty(0).hwnd 'there is only one txtQTY - it is indexed because all the objects in the forms belong to an array of controls which are assigned from a database End If End If -- Regards, Jamie Tag: User-defined type not defined ? Tag: 597674
  - 3
    - Neatening up a listbox I am reading data from an external file and writing this into a list box. I would like to show the listbox neatly formatted with all the data in columns, sized to the widest data item in that column. Is this possible without padding each data item with spaces to the length of the longest data item for that column? If so, how? Any help is appreciated. Tag: User-defined type not defined ? Tag: 597673
  - 4
    - cry for help Hi all Not being more technically minded when it comes to writing detailed code, was wondering if somebody could guide me in converting a short piece of HMTL (vbscript) into a form in vb6 comprising of 7 checkboxes and a command button to run code. I can create form and button, but not sure how to write of implement code. I can email Hmtl(vbscript) to anybody who may be prepared to help me. Here hoping for some help Ian Tedridge Tag: User-defined type not defined ? Tag: 597664
  - 5
    - Change backcolor of a ListView Header Hi, Does anyone know of a way to change the BackColor of a ListView header either subclassing, or otherwise? Thanks. Tony Tag: User-defined type not defined ? Tag: 597661
  - 6
    - Simple Syntax Question This doesn't directly address the use of the SOAP Toolkit 3.0, but it does address the question of VB syntax: For example: Nodes is an object... soapClient is an object... GetManufacturers is one of VARIOUS methods which change as the user changes the WSDL document that defines the services available on the webserver. So... Set Nodes = soapClient.GetManufacturers("40101", "mistral1") But, I need to use a Form with a text box that will allow the user to put in a comma separated list of services they want, then I'll split the string into an array, then as I loop through the array I want to dynamically put in the string where [GetManufacturers] is... So... Set Nodes = soapClient.[string from array]("40101", "mistral1") How can I dynamically parse a string here and get the statement to compile? P.S. - if anyone can give me a simple example of calling a webmethod with the low level api from the SOAP Toolkit 3.0 it would be greatly appreciated... Tag: User-defined type not defined ? Tag: 597659
  - 7
    - missing control toolbox Using VB6 (Pro, SP6) in Visual Studio. For some reason I have lost my control toolbox and I can't see any option/setting under View or Options to get it back. I am talking about the standard control toolbox here to add buttons etc. to forms. Any suggestions how to get this back greatly appreciated. RBS Tag: User-defined type not defined ? Tag: 597648
  - 8
    - Default folder in common dialogs In the File Open and File Save common dialogs, is there a way to specify the folder that should be presented when the dialog is displayed? Is there a way to specify a default file name that is highlighted in that folder if it exists? -Dan Tag: User-defined type not defined ? Tag: 597646
  - 9
    - Err object in class works and then not works. Hi everyone, Using vb6 with sp5. Here is the background: Have a class that I use to call a public function and I call this function multiple types because I am in a for loop. Inside the function I have the error condition set to on error goto errors. In the errors section I have it log the error and then set the error catching off using on error goto 0 where it then exits the function. Upon the next loop of the for, we re-enter the function again and the error condition is reset back to the above for-mentioned statement. Here is the problem, at random times the function will not go to the error section when an error occurs. I get an error prompt with the message when working in the ide and the program crashes when complied. I even put a counter in the error section and did a debug.print lngErrorCount and sometimes the program will work for a while. One run I got 49, another 340, and 0(it error on the first time in the function). Anyone have a clue why it is not working for the error catching? Thanks Jon Tag: User-defined type not defined ? Tag: 597638
  - 10
    - Reading the contents of a zip file I want to be check the contents of a .zip file for a certain icon(.ico file) and if it exists, display the icon in a picturebox. What is the best way to do this, preferably without third party controls. -- Thanks. Tag: User-defined type not defined ? Tag: 597636
  - 11
    - Open Window Explorer in "My Documents" or other Special Fodlers" How does one open Windows Explorer to the Selected Special folder. Ex My Documents, My Music, Temporary Internet Files etc. -- Thanks in advance Robert robert11@nas.net Tag: User-defined type not defined ? Tag: 597627
  - 12
    - VB6 and Perl on 2000/XP: Req recommendation for interprocess communication I'm working on a VB6 program that will kick off a command process (using COMSPEC) that will run a perl script, which in turn may execute nested perl scripts. (I think it sounds worse than it is.) I have tested a prototype which appears to work, using CreateProcess (this way, I can stop the process if I need to). I would like the VB program to be able to continually monitor and receive status from the running perl script(s) so I can update a status bar, and perhaps display progress information in a textbox. To me, watching the text whiz by in a console window looks kinda 80's... :-) Can someone suggest an optimal approach for this? Thanks Tom NOTE - cross-posted to VB and Perl discussion groups Tag: User-defined type not defined ? Tag: 597622
  - 13
    - extending Type structure and Run-time error '49': Bad DLL calling convention I am at the loss to explain the follwing: Type LINECALLSTATUS dwTotalSize As Long dwNeededSize As Long dwUsedSize As Long dwCallState As Long dwCallStateMode As Long dwCallPrivilege As Long dwCallFeatures As Long dwDevSpecificSize As Long dwDevSpecificOffset As Long End Type Public Const LINECALLSTATUS_FIXEDSIZE = 36 Public Sub rlineCheckCallStatus(ByVal Line As Long) Dim b As LINECALLSTATUS b.dwTotalSize = LINECALLSTATUS_FIXEDSIZE + 2048 rtn = lineGetCallStatus(hNewCall(Line), b) End Sub When I call that sub from another sub I have this error: Run-time error '49': Bad DLL calling convention But, when I extend the Type LINECALLSTATUS by my own code: mem As String * 2048 ' ADDED BY Jack like shown below I do not have that error Type LINECALLSTATUS dwTotalSize As Long dwNeededSize As Long dwUsedSize As Long dwCallState As Long dwCallStateMode As Long dwCallPrivilege As Long dwCallFeatures As Long dwDevSpecificSize As Long dwDevSpecificOffset As Long mem As String * 2048 ' ADDED BY Jack End Type and change sub like this: Public Sub rlineCheckCallStatus(ByVal Line As Long) Dim b As LINECALLSTATUS b.dwTotalSize = len(b) rtn = lineGetCallStatus(hNewCall(Line), b) End Sub I checked. In both cases value of b.dwTotalSize is the same. So why that error? I need to know why I am having that error in the first case. It is not permanent error. After retrying several times (Debug and Run) vbasic let me finish that call after some time. Your thoughts deeply appreciated. Jack Tag: User-defined type not defined ? Tag: 597612
  - 14
    - Adjusting Contrast or Brightness in VB6 In VB6: Does anyone know of a very efficient and fast way of altering the Contrast or brightness of an image (in a picturebox) on the screen. The image does not have to be saved. Thanks. Tag: User-defined type not defined ? Tag: 597611
  - 15
    - Scanning for Wordpad.exe program Hello, I program with vb6 sp6 on win98se. I've always used windows write.exe and now use windows wordpad.exe to act as a report viewer, document editor and printer system for my vb apps. Windows 2000 and on up seem to have renamed or used a different path system for placing their windows document editor in. In win98se the path is usually on a default install "c:\program files\accessories\wordpad.exe" To get this feature I use to work on all levels of windows, I thought I'd write a routine that scans the HD looking for wordpad.exe so my app can set it into its config file. Before I commit to coding this function, I thought I'd just touch base here to see if there is a more robust way of doing this? I.E. in scanning the HD for wordpad.exe. My thoughts are to just open a directory, scan it, and keep doing this until my app found wordpad.exe. Does wordpad.exe exist on all levels of windows ? -- Ken http://www.heal-me.com.au Tag: User-defined type not defined ? Tag: 597609
  - 16
    - Subclassing Help Dear All, I have subclassed a UserControl to detect when the middle scroll mouse is used and the following sample values are returned from my CMouse class Event: nKeys: 0 Delta: -1 XPos: 822 YPos: 187 nKeys (Tells me whether the middle scroll Mouse has been depressed: 16 Yes and 0 No) Delta (Tells me whether I am scrolling the mouse up or down: -1 Down and 1 Up) XPos and YPos give me the co-ordinates on the form My question is that the class event is only fired when I scroll the middle mouse and, most importantly, the UserControl on the form has the focus, where I would like it to be fired, wherever I have the current focus on the form. This is what I thought would happen. Can someone advise me what I am doing incorrectly? I can send all the relevant code in a future post if requested. Mouse Handling procedure: Public Function WindowProc(ByVal hwnd As Long, _ ByVal uMsg As Long, _ ByVal wParam As Long, _ ByVal lParam As Long) As Long Select Case uMsg Case WM_MouseWheel nKeys = wParam And 65535 Delta = wParam / 65536 / WHEEL_DELTA XPos = lParam And 65535 YPos = lParam / 65536 CMouse.FireMouseWheel nKeys, Delta, XPos, YPos WindowProc = CallWindowProc(lpPrevWndProc, hwnd, uMsg, wParam, lParam) Case Else WindowProc = CallWindowProc(lpPrevWndProc, hwnd, uMsg, wParam, lParam) End Select End Function Thanks again. Alastair MacFarlane Tag: User-defined type not defined ? Tag: 597595
  - 17
    - Disable Items in a ComboBox Does anyone know of a combo box where I can disable some of the entries programmatically? Free, Easy, and Cheap. (the combo box, not me) kpg Tag: User-defined type not defined ? Tag: 597593
  - 18
    - get progid from typelib? i would like to get the full progid (project.class) for a late-bound object. can the typelib do this? i know i can call TypeName(Object) to get the class, but i need the project name as well. thanks, craig buchanan Tag: User-defined type not defined ? Tag: 597583
  - 19
    - VB6 Application version Hi, How my VB6 appl. can read the version major.minor.revision of another VB6 appl. exe? Thanks you Marty Tag: User-defined type not defined ? Tag: 597578
  - 20
    - Comms support Can somebody advise best place to get support for comm communications in vb6 cheers Tag: User-defined type not defined ? Tag: 597568
  - 21
    - Delphi For VB Developers (again) You may recall there was recently a discussion in this group about the 'easy migration path' which Borland has provided for Delphi programmers to enable them to port Win32 code to .NET. Some people here suggested that some VB developers should think of switching development to Delphi rather than convert existing code to VB .NET. I promised that when I did the interview with David I would ask him to comment on this. Well, I did. So if yoiu're interested, you'll find the video on www.bitwisemag.com All I need now is to find a Microsoft person to put the alternative case. If any MS people want to offer to do this, you know where you can find me ... ;-) best wishes Huw Collingbourne ================================ Bitwise Magazine www.bitwisemag.com www.rantsandraves.co.uk Dark Neon Ltd. ================================ Tag: User-defined type not defined ? Tag: 597553
  - 22
    - VB.net with messagequeue I'm in need of a little direction, I've been tasked to create an app where the user can store dates and times in a table (informix) and when that date and time occurs send a popup message (like using net send computer_name "message") to a select number of computers on our network. My question is will messagequeue do this? I've read several articles about messagequeue but nothing indicating that it sends a popup (like net send). Thanks for any help provided. Tag: User-defined type not defined ? Tag: 597546
  - 23
    - Web directory listing Hi, How can I retrieve the file listing of a directory located on my web site? ex: http://www.myAddress.com/download Thank you. Marty Tag: User-defined type not defined ? Tag: 597545
  - 24
    - Installed Program Hello. I wrote a special program for our 29th Anniversary, packaged it and installed it on my main PC. I wanted my Grandson to run it for my wife cause she don't know nuttin bout PCs. My Grandson does not have administrator priviledges. When I signed in as my Grandson I located the program in Windows Explorer, created a shortcut and placed it on his desktop. BUT when I double click on it, I get a Windows Installer window and then an "error 1706 No valid source could be found for Microsoft Office 2000 SR-1 Professional. The windows installer cannot continue." I don't understand why Windows Installer is even running here, I have already installed this application from the PDW package. The other programs that I have install this way run just fine from my User Account where they were installed. They don't trigger the Windows Installer. Why doe's the program shortcut that I put on my Grandson's desktop trigger the Windows Installer? When I click the cancel button to get rid of the error message, the application is loaded and runs just fine. Thanks in advance for any help on this. Jim. Tag: User-defined type not defined ? Tag: 597539
  - 25
    - VB Converter to ASP Hello, I've never heard of a Conversion tool that worked well enough to justify using it. I haven't checked around on this subject for quite some time. I was trying to find out if there existed a tool (descent tool) that wold convert VB6 code to VB.Net or C# ASP and if so, is it any good. Thanks for any help... Tag: User-defined type not defined ? Tag: 597537

Please Help, I have a demo project in VB6 that is supposed to communicate
with the USB interface (Relay control unit connected to usb port)

When running code, get the following error.

User-Defined Type not Defined, when debug is sellected, points to the
following code.

Set Datalab = New ControlWeb.DRVAXDLUSB

Can somebody tell me how I go about defining this please.

Ian Tedridge

Top

Re: User-defined type not defined ? by Mike

Mike
Tue Jun 07 05:11:17 CDT 2005

> Please Help, I have a demo project in VB6 that is supposed to communicate
> with the USB interface (Relay control unit connected to usb port)
>
> When running code, get the following error.
>
> User-Defined Type not Defined, when debug is sellected, points to the
> following code.
>
> Set Datalab = New ControlWeb.DRVAXDLUSB
>
> Can somebody tell me how I go about defining this please.

You'll need to add a reference to whichever library exports the ControlWeb.DRVAXDLUSB object.
I've just done a quick test here and you may be able to find it this way; run the registry editor (Start -> Run ->
RegEdit), navigate to the HKEY_CLASSES_ROOT hive and have a look for a ControlWeb.DRVAXDLUSB entry. Once you've found
it you'll find there's a Clsid sub-key with a GUID default value. Find this key under HKEY_CLASSES_ROOT\CLSID\ and one
of the sub-keys should have the OCX path.
Bit of a kludge but it appears to work for a few OCX's I've got here.
Hope this helps,

Mike

- Microsoft Visual Basic MVP -
E-Mail: EDais@mvps.org
WWW: Http://EDais.mvps.org/

Top