vb6

Loading a Vb.net control inside a VB 6 form

Hi, I have a user control in vb.net application. and i have a form in vb 6. so in my vb.net applciation to this user control i need to mention the vb 6 form as its parent. Means when i run a vb6 application i should see this user control as a part of that form. Ahy help appreciated. ...

Problem with app.path in my vb6 app

Hello. I have an application in vb6 and my exe is having a problem with app.path. The app.path of my .exe is setting a temp folder. I tried a test and put another app just to show me the app.path of the application, and in this other program is okey. Somebody has some idea about this problem? thanks. ...

Can't create object: ADODB.Stream

Hi! I am trying to create ADODB.Stream object in VBscript. This is the function: Function ByteArray2Text(varByteArray) 'Convert byte array into a string with ADODB.Stream 'Data should be real plain text because binary data will be mangled Dim byt Const adTypeText = 2 Const adTypeBinary = 1 Set byt = CreateObject("ADODB.Stream") ...

Profiling a .net library

I'm referencing a class in a .net library in VB6 and need to profile it. Is there a profiler that can be pointed at a .net library dll? The memory issues I wish to profile only happens when used in the VB6 application. The pure .net test application for the library does not have memory issues. ...

VB6 How to deal with the file name having invalid character

Hi all, I have created an application in VB6. I have to read attachments of a mail of client. But attached file has a name with invalid characters. I want to make the copy of it but my application cannot do it. So could u plz help me to solve this issue. Thanks in advance. EDIT: How can i check that the file name contains invalid ...

How to calculate that has passed six months from a given date in VB6?

This is not an homework question :). I would like to code a function that return True if 6 months has passed since a given date (so, i'm on the first day of the seventh month). Function PassedSixMonthsSince(Dim dGivenDate as Date, Dim dCurrentDate as Date) as Boolean These are some tests that this function must pass: Debug.As...

how to lock a system login after 3 failed attempts in vb6?

I already made security login that if failed 3 times the program will be terminated. However, I want to make a security login that will lock the system and the admin will be required to login instead. Here's my code: Dim nCnt As Integer Dim nCnt2 As String Private Sub cmdOk_Click() nUsername = "username ='" & txtUsername.Text & "...

randomly generate 40 questions in vb6? please help me

i've been trying to create a vb6 code that will randomize 10 questions but it's not working. i use sql as my database here's my code: Private Sub cmdNext_Click() Dim real_ans As String Dim nCnt As Integer 'nCnt = nCnt + 2 'Label3.Caption = nCnt real_ans = Adodc1.Recordset.Fields("answer") With Adodc2.Recordset Dim grade As String If...

Getting my hands on some old Protoview VB6 controls...

Hi all, I have inherited a project from a client, who believes he has all the source code, but unfortunately this particular VB6 application used a bunch of custom controls that the original programmer will not give up (he may in fact have purchased the licenses himself, so he may be right in not turning them over, on the other hand sinc...

Upgrade VB6 application to Visual Basic 2008

Hi, I've got a VB6 application, and i want to develop it with Visual Studio 2008. The problem i've got is the upgrade wizard. By starting the wizard it's working ok. But when the parsing process is running it take 100% of the CPU and keeps on the same status: Parsing form. It's running for several days. How can i migrate the applicat...

Why am I having problems passing argument to or from a FORTRAN DLL from VB.NET

I have a DLL written in fortran that I know works because I am getting it from a working software package that we use daily. I am trying to call it from anything but am having problems i believe with passing the correctly formatted arguments in and out of it, so i decided to try and access it from a VB program. I chose VB because I hav...

Need to add "exe" version info to a mobile device exe created in VB

I want to add version info to my mobile device exe file and apparently the following line is not supported in CF (windows mobile 6.0), ideas?: <Assembly: AssemblyFileVersion("1.0.0.0")> I want to be able to to right-click on the .exe after it is copied over to the PC and have the version displayed in a version tab just like any other...

Embedding an application manifest into a VB6 exe

I have recently gone through a bunch of standalone utility apps written in VB6 to make sure that registry virtualization is turned off for Windows Vista and above. I created a standalone manifest file for each exe, set the requestedExecutionLevel appropriately (some of them need to modify HKEY_LOCAL_MACHINE registry keys, others do not),...

VB6 app hangs for a while on Windows Server 2008 sp1

I have a problem with our VB6 app. It's an old system with lots of forms run on our customers Terminal Servers. One customer has a problem and they have two Windows Server 2008 (32 bit), I don't know of anyone else with the same problem. Other customers has XP, Win7, Windows Server 2003 and Windows Server 2008 (64 bit). I haven't found a...

Notes Sessions Vs Lotus Session COM API Issues

I maintain a fairly large application which does a lot of talking with Lotus Notes. Recently in the last couple of months, some users have been having problem connecting to the Lotus Notes Session, I use the following code to get the session Set Session = CreateObject("Notes.NotesSession") This error seems to be popping up only for a c...

What is the Reference that we have to add to use the Format function in Visual Basic 6.0?

Hello, I'm using VB 6.0 and it gives me: "Compile Error: Can't Find Project or Library" in this sub: Private Sub MDITimer_Timer() Dim textStr As String textStr = Format(Now, "dd-mm-yyyy hh:mm:ss") StatusBar.Panels(1).Text = textStr End Sub I made it like this and the error still was in the Format function (so it is not a...

CreateProcess and strange nslookup error

I have this api routine that I use regularly to capture dos output. Recently a strange bug has been found where it doesn't seem to allow dns calls. For instance nslookup will return the "No response from server" error with Server: UnKnown. Ping will work if you supply it an IP address, but not if it has to make a dns call. This problem i...

mouse indicator speed

I opened up a ball mouse and saw the slotted disks which turn past the light collectors. Where can I find code to capture, or see in a Windows program the speed that these slots are being detected as the mouse ball moves? I am trying to write a VB6 program which tells me the speed (slots past the collector per second) that the disk is t...

What went wrong with my Declare statement?

I've recently fixed a bug in a VB6 application, but I'm not sure, what exactly went wrong. The offending part was a wrong API declaration of CreateEvent. This is, what API Viewer generated: Declare Function CreateEvent Lib "kernel32" Alias "CreateEventA" (lpEventAttributes As SECURITY_ATTRIBUTES, ...) As Long The next one is the wro...

VB6: problem with activeX dll

hi all, i created an activeX-dll which returns a class object (let's call it myclass). the problem: although i got myclass added in my host-project, i'm getting a type mismatch error when trying to define the returned object as myclass like: sub dll_done(obj as myclass) it only works with type variant. seems like it's something wit...