Visual Basic 4 / 5 / 6 Forum

hi i want to select any data form mysql with vb6 i cannected mysql with this ###################################### Set conn = New ADODB.Connection conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _ & "SERVER=localhost;" _ & "PORT=3306;" _

How do you force a user to enter the correct dates (In & Out dates) while comparing 2 date fields in MS Access. User should get an error message indicating "Out date should be greater than In date.

I have a large file application that worked well in VB6.... thinking of replacing .... what do you recommend.....java?, c++, or ruby or ????? very open to suggestions

I am having problems with my code. I am trying to look at a date on a form and show me the weekday number for that date on the same form different text box. I am using MS ACCESS 2013 VBA Private Sub TxtAppointmentDate_BeforeUpdate(Cancel As Integer) Dim D As Date Dim W As Integer D = (TxtAppointmentDate) W = Weekday(D) Me.test = W

hI... I have one raw data file with the sequence as follows: first 6 digits are date next 4 digits are time followed by counts of next 5 digits and repeatation of the same pattern throughout the txt file. Now I want to extract the counts from this file and want to make a new file? How Can I do this? Pls help...

I'm using StarDoc , EndDoc to print text rotation and image, but i print text only. Here my code: hPrintDc = CreateDC(Printer.DriverName, Printer.DeviceName, 0, 0) result = StartDoc(hPrintDc, di) 'Start a new print document result = StartPage(hPrintDc) 'Start a new page ' hMemoryDC = CreateCompatibleDC(GetDC(0)) ...

I have been having problems with double click event not triggering so I Did this test. It is a single form with one button that should open a msgbox if I double click on it. I never see the msgbox. Public Class Form1 Private Sub ButtonDoubleClick_DoubleClick(sender As Object, e As EventArgs) Handles ButtonDoubleClick.DoubleClick ...

Dim iContatore As Integer Dim nCifre As Integer iContatore = 10 nCifre = Int(Log(iContatore) / Log(10)) Debug.Print nCifre It gives me '0' instead of '1'. WHY??

Hi All, I have a small form that allows scale weigh data to be diplayed in a textbox. i can communicate with the scale - tare, zero etc. how do i filter the weight string or i think it may be called parsing? i'll try to explain: currently i can have the scale sending continuous weight data, but i can also set it to print every secon or so,...

Hey! I have vb.net windows application form and I want the radio buttons inside it to show green color instead of default black. Please help me with the code. Thanks.

how can i add a recordset to my newly created database..Im using the adodc object control and i already set the properties that need to be set..the problem is i can addnew record but when i run the program the records that are in the database shows in the textboxes..how can i add new records without the records appearing on the texboxes..

Hi, I am using Visual Basic 5 Learner's edition on a HP envy laptop running Windows 7. I have written some fairly unsophisticated, but quite useful routines for my personal analysis of the UK 6 from 49 lottery. For my purposes I have created a 7x7 "grid" consisting of an array of labels (i.e. label1(0) to Label1(48) and have written code to...

i want to display the selected date from the month calendar in the textbox.please tell me how to do?plz reply quikly.

Sub LOCKED() Private Sub Worksheet_Change(ByVal Target As Range) Dim Rng As Range Set Rng = Range("$a$1:$b$1") If Not Application.Intersect(Target, Rng) Is Nothing Then Sheets("Sheet 1").Unprotect If IsEmpty(Target) Then Target.LOCKED = False Else Target.LOCKED = True

Am interested in learning Visual Basic. Any tips?

Private Sub cmdAdd_Click() Dim NetPay As Double If cmdAdd.Caption = "Add" Then Adodc1.Recordset.AddNew cmdAdd.Caption = "Save" cmdUpdate.Enabled = False cmdDel.Enabled = False Else Text9 = Val(txtSSS.Text) + Val(txtTAX.Text) + Val(txtPhilHealth.Text) + Val(txtPagibig.Text) + Val(txtCanteen.Text) +...

Sir plz tell me how to calculate all rows data . i mean how i change this code into for loop . Public Class Form1 Dim A As Double Dim B As Double Dim C As Double Dim D As Double Dim Z As Double Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

I have created a excel file through VB6 But I tried to create a module in that workbook through the vb6. But it shows some syntax error. Anybody can, please help me.

Hearty greetings to all. I have a website collection of different web forms. I had published it in LAN via visual studio when I had Windows 7. Now I have installed windows 8. When I tried to publish same it show following error. How can this error be removed? Detailed Error Information: Module IIS Web Core Notification ...

I had this code ages ago and saved it someplace safe. So safe, I lost it, and now I cannot recall how I did it. I went accross the internet to find similar code and did find this code, which is pretty much almost where I am trying to get to. Basically, the code attached will tell me how many records are in the file I tell it, through an alert...

I have deployed a webpage via visual studio 2010 in my local hard drive. Now I want to access it without opening visual studio and without using windows IIS feature . How can I do it? Please help me to do so.

Make Vb Wait A Few Secs Before Next Command

Hello Everyone, Greetings to All. I have some Issues in the below Macro. My intention is to Copy/Insert the multiple Images in a folder that I select to the multiple sheets of a excel workbook. The Macro should only have to insert the select images to the sheets. The sheets are named as "Sheet1, Sheet2, Sheet3... etc..." I want to insert 1st...

how to do Multiple Actions in one button vb

I am trying to create a hopefully simply program that will allow users the ability to right-click on a window of their choice and then change the title of the window. I have been researching the different ways I can do it but the things I seem to be trying aren't working. I have been recommended to use the getwindowtext and setwindowtext features...