Visual Basic 4 / 5 / 6 Forum

Pleae give me one or more examples for how to declare form level variables in visual basic 6.0

Here is the code I have. Public Class Form1 <DllImport("User32.dll")> _ Public Shared Function FindWindow(ByVal lpClassName As String, ByVal lpWindowName As String) As Int32 End Function #Region "Using Proxy" <Runtime.InteropServices.DllImport("wininet.dll", SetLastError:=True)> _ Private Shared Function...

i juse attached my project, in that i don't know how to fetch data from database based on input value. When i enter empid, Automatically Username And Designation should be fetch in front end from database, and password can be entered by manually, and dont know how to give link table based on designation. Ex: If designation="Manager" then...

Hi Geeks, I am trying to execute the below script(cpu usage2_1.vbs) and I am getting the invalid character error 800A0408. $proc =get-counter -Counter "\Processor(_Total)\% Processor Time" -SampleInterval 2 $Cpu=($proc.readings -split ":") $cpu 1. From Google the information was either there will be special characters or it will not...

Hi,I created an application form using vb6.0 and MS Access 2007.In my project I need to display register number automatically in the textbox.

I have an already compiled app that sends data to a printer, but i need to save this printer data in XPS Document without any saving form prompt.

Hello, I have a list of 10 Variables within an MS excel worksheet. Each variable is in a separate cell (row of 10) adjacent to a number corresponding to that variable (1-10). I would like to write a script in VBA to calculate all the permutations of these 10 variables combined and separated by commas. (i.e. Cell b1 = small, b2 = medium, b3 =...

Hi there tried creating new entry, it only works when the database is decompreste? weird I know. can anyone help ? thanks PS: see code below Dim HospitalNumber As String Dim strSQL0 As String

Hi, I am migrating someone else's MS Access db and have a couple thousand records where they have an attachment data type saving a PDF file - in the table. So I am looking for a procedure or loop command on a form to run through the table and save those files on a shared drive. Ideally I want to be able to use the ID of my new table for part of...

Imports Microsoft.Office.Interop Public Class Form2 Private Property newinfo As Object Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim xlApp As Excel.Application Dim xlWorkBook As Excel.Workbook Dim xlWorksheet As Excel.Worksheet Dim...

Hi, Can anybody let me know whether this command will work in JMAIL. JMAIL.AddRecipient "1st@mail.com,2nd@mail.com,3rd@mail.com" I need to add few more recipients to the mail list, but the problem is, the class library is designed to accept only one parameter for recipient, and the email address is being passed from a vbscript. The...

Hi, I want to run some conditions for one browser and do the same for browsers.When i try "Application.OnTime TimeToRun, "Chrome"" its working fine ,but when i want to do the same for 3 browser at same time its taking only last condtions . Pleass find the code below and let me know how to run all 3 conditions same time. Sub DeleteonTime() Dim...

I have an Access application which works fine in earlier versions of MS ACCESS on earlier platforms. I am now trying to get it to work in Access 2010 on Windows 7. In earlier versions I simply had to put the DLL in c:\windows\system32 I am currently getting error 48 File not found. Anyone got some ideas? Security? different directory?...

Private Sub show_detail() On Error GoTo ErrHnd Dim EmpName, CatName As String Dim intCarried, intAllocated, intAdtnl, intAllot, intLevTaken As Integer Dim rsLev As ADODB.Recordset intCarried = 0: intAllocated = 0: intAdtnl = 0: intAllot = 0: intLevTaken = 0 ListView1.ListItems.Clear If (optnsummary.Value =...

hello i do not speak very well english, i want to believe that you understand.So I solved a program which create a fortran dll and call it from visual basic. The programm takes the values of two textboxes, call fortran dll and do the computation and turn the result on a third textbox. It works and all are fine. But my teacher told me that i...

Hey guys, I created a macro that will send massive emails by clicking a button if one cell in a particular column includes a specific wording. I.E: If c = "BD" Or c = "BD/PD&R" Then Dim olMail As Outlook.MailItem I have the whole thing, but it happens a lot that we accidentaly click the buttons and massive emails go out again an again, all...

I am working on vb6 I have a pc with 2 network cards. I want to send messages and make sure it comes out of a particular plate. After making socket.bind to do Socket.connect gives me error "Invalid operation at current state" When I do the socket.status socket.bind gives me 1 (open) and no longer supported but the attached Can anyone...

I have a web application with two dropdown lists. on the SelectedIndexChanged event, I want the page to refresh. What is the best way to accomplish this? Note: Each dropdown list navigates to a new tab when a value is selected. I want the original page to refresh after this event.

I need to get files from my camera. I see it in my browser as a folder attached to "Computer", not under "C:" When it is connected, a control panel dialog shows up and displays the path as "Control Panel > Hardware and sound > Devicess and printers > Canon Power shot........ However, in the explorer, it shows as Computer\cannon...

Please help me to get caller id(CID) phone number into my vb6 source code,by using MSComm facility connected through US Robotics message modem. While ringing the phone i am getting input buffer "RING" only instead of phone Number.. Plase help me by any one i will be greatful and appreciate. regards, Alawi

I am using VB5 with speed optimization and have run into a sitution that the compiled code generates an incorrect result. The problem is with the '<' operation. The following code does not compile correctly: If FLD(NR) < FLD2(NR) THEN DO THIS ELSE DO THAT END IF IF FLD(NR) IS FOR EXAMPLE 600 AND FLD2(NR) IS 3000 YOU WOULD EXPECT...

Hello, I', trying to program the access to a https url, but I have a problem, because when I program to navigate the url-> objIExplorer.Navigate "https://edomus.tesa/", then appears a pop-up screen with username and passowrd required , and the program never progress..it stops in this step. I don't know the form to introduce the username and...

How to Print Unicode Chars from Ms access 2007 database to Notepad. It is always printing like "??????????? ??????" Example: Open "F:\Test.txt" For Output As #intFileNo Print #intFileNo, ChrW(1949) 'I stored as char Close #intFileNo Answer:

I am using Visual Basic Express 2010 to create a project. My database is SQLExpress. My project requires to read certain values from database while opening. To backup database, I simply copied database from the location to other, it worked successfully. But while replacing the database as restore, as database is already opened while running...

Hi I am using a software which is based on vb6.0. While am running the antivirus i have lost the .exe file in the software package. Is there any way to fix the problem i just want to re install the program. And i have an another setup file but while running it shows me as run time error 5 invalid procedure call or argument... I could not get...