vb6

VB6 API Declaration Path

I have the following declaration in a Module: Private Declare Function gzopen Lib "ZLIB.DLL" (ByVal filePath As String, ByVal mode As String) As Long The following code line in a function fails, with a 'File Not Found: ZLIB.DLL' error: lGZFileHandle = gzopen(sPath, "rb") I'm aware that ZLIB doesn't need to be registered. My questi...

Change background color of ListView in VB6

I'm working with some legacy code and need to change the background color of a row (and the font color) in a ListView in VB6 based on some criteria. I need to change the color of the row when the row is selected and not selected. I can change the font color of a non-selected row via the .Foreground property but I can't change the color...

Are there any good resources for dealing with "User Document" (.dob) files

I've inherited a vb6 application that makes use of "Visual Basic User Document" files (.dob). This tech seems to be abandoned and forgotten. Are there any good resources out there for working with them? ...

Iterop Forms Toolkit validation and focus events

I have an existing VB6 application which I am slowly moving its code to DotNet, in a lot of instances this means having to use DotNet usercontrols and hosting them in the VB6 form using the Interop Forms Toolkit v2. At present the current method is to develop the usercontrol in C# and then have a VB.NET usercontrol which inherits from t...

Is use of Mid(), Instr(), LBound(), UBound() etc. in VB.Net not recommended?

I come from a C# background but am now working mostly with VB.Net. It seems to me that the above functions (and others - eg. UCase, LCase) etc. are carryovers from VB6 and before. Is the use of these functions frowned upon in VB.Net, or does it purely come down to personal preference? My personal preference is to stay well away from th...

When I select the value from the combo box, related value should appear in the text box

When I select the value from the combo box, related value should appear in the text box ComboBox code. cmd.CommandText = "select distinct PERSONID from T_PERSON" Set rs = cmd.Execute While Not rs.EOF If Not IsNull(rs("PersonID")) Then txtno.AddItem rs("PersonID") End If rs.MoveNext Wend ...

How to set a Database Connection for all the Form in MDI?

Using vb6 I am Using MDI Form, In all the Form i need the database Connection, How to give connection is active for all the forms. I want to write a common connection for all. Then I will call the connection for the forms whenever i needed. Am new to MDI Form. Need VB6 code Help. ...

Inline data representation

I would like to represent data that gives an overview but allows them to drill down in an inline fashion - so if you had a grouping of say 6 objects the user could expand the data and it would show the 6 objects immeadiately below it before any more high level data. It would appear that MSHFlexgrid gives this ability but I can't find an...

VB6 Automation Error on Calls to .NET 3.5 Assemblies After the First Calls

Some of the sources I've checked already: http://www.experts-exchange.com/Programming/Languages/.NET/Visual%5FBasic.NET/Q%5F23359339.html http://mygreenpaste.blogspot.com/2006/03/net-framework-20-configuration-tool.html http://support.microsoft.com/kb/186063 I'm busy developing .NET modules that will hook into our existing VB6 code. I'v...

Run SSIS package from VB6...Urgent please

Hello everybody, can anyone help me and tell me how can I run a SSIS package from vb6? ...

vb6 - How to pass a function for parameter?

How can I do to pass a function by parameter, later to be called in VB6? would be something like what I need, can be any of these options: Private Sub Command1_Click() Call callMethod(MyPrivateFunction) Call callMethod(MyPublicFunction) Call callMethod(MyPrivateSub) Call callMethod(MyPublicSub) End Sub Private Functio...

Disable dynamic searching when typing in a listbox

In VB6, if a listbox containing alphanumeric data has focus and a character key is pressed, the first element in the listbox starting with that character is highlighted. If multiple characters are pressed, the first element starting with each character is selected after each character press. Typing M-A-R-T will select the first M-word,...

Combobox with comparison operators

I actually have an equation to make on visual basic. An exemple of it (12 = 12) AND (12>1) true and true the answer would be TRUE But for both comparison operators i must create a combo box to insert <, >, =, <=, >=, <> My problem is my program wont function because I don't know which variable to use for those... could anyo...

Access Database Default Date cannot contain 00 hour, 00 min or 00 sec

So, we have an old VB 6 App written many many years ago. It uses an Access Database to store data, and the VB6 App as the interface to this data Now, to change the VB6 app would be quite difficult, and I'm trying to avoid this. The problem is, when the VB6 inserts data into a table in the access database, the table has a column which use...

Do you have examples of push-the-envelope programming usage of VB6?

VB6 had a reputation for being too forgiving (and thereby allowing bad practices) and hiding complexities that perhaps developers would be better off needing to know. But I found that, say, 90% of applications could be done in VB6. But I'd like to see more examples of pushing-the-envelope to work round VB6's limitations. For example, I...

How do I convert a stdole.StdPicture to a different Type?

To receive the bounty, please provide an answer with working code. Thanks. I have a stdole.StdPicture Object of the Type vbPicTypeIcon. I need to convert it to Type vbPicTypeBitmap. Due to project contraints, I need to be able to do this using Win32 or VBA. I am trying to load a file's icon to a command bar button. Here is what I have s...

How to handle ridiculous comments?

Working in a classic VB6 app, crazy comments by the thousands. Example: If garrFilePaths(i).FilePath = "" Then 'do nothing Else MsgBox "File Not Found (" & garrFilePaths(i).FilePath & ")", vbOKOnly, gcstrMessageBoxTitle End If ...

VB6 - Inet hangs - multiple form instances

Hi Here is my app status: Purpose - download multiple list files from internet Approach - created a simple "download form". After a while, I just needed more forms because I had more than one list of files to download. Just solved that by adding a MDIform to my project, add a button to create another "download form" instance and voilà....

How to deal with VB6 .vbp file references changing

Our VB6 guy was part of the last RIF (Reduction in Force). The work he did has been split between me and another developer. We often are both are making changes to projects at the same time. This isn't a problem with CVS since we are working in different areas. However VB6 seems to modify the Reference section and change the paths each t...

Crystal Reports 8.5 Concurrent Licenses Issue with vb6

I'm having a licensing issue with my vb6 app and crystal reports 8.5. From time to time it keeps popping up saying "Not enough Concurrent Access Licenses to log you on ..." I've read some stuff online, saying I should close all instances of the report object and set all references to nothing when closing a report etc ... That d...