Post your Vb 6.0 Questions Here

U mean u want to program in vb using microsoft access as your backend?

please i need a b code that would help me link my vb form to my access page.
the problem is that am working on a databasesoftware. so i designed a form in vb to fill in certain information into my access table. but the two are not communcating.

i used db for connection string and rs for Recordset
i.e
DIM DB AS CONNECTION
DIM RS AS RECORDSET

SOME OF THE FIELDS I USED ARE
NAME
AGE
SEX
STATUS.

PLEASE USE THIS TO HINT ME. TANKS SO MUCH

I NEED A VB6 CODE THAT WILL HELP ME LINK MY VB FORM TO MY ACCESS PAGE.

I AM WORKING A SIMPLE DATABASE PROGRAM THAT WOULD TAKE INPUT FROM USER AND SAVE IT IN AN ACCESS DATABASE.

MY FIELDS ARE
AGE
NAME
SEX
STATUS

PLEASE KINDLY USE THESE FIELDS AS THEY APPEAR ON BOTH THE VB INTERFACE AND THE ACCESS TABLE.
THANK YOU SO MUCH
MY EMAIL ADDRESS IS gbenga89@yahoo.com

ELIJAHLOVE Am sorry am out of net because of out internet is down.

To connect ot MS Access database do the following

dim db as new adodb.connection
dim rs as new adodb.recordset

db.connectionstring=<"your connection">
db.open
set rs=db.execute("Select * from datatable")

'to insert data do the follwoing

rs.addnew
rs.fields("name")="Elija"
rs.fileds("Age")=27
rs.fields("Address")="Abuja"
rs.update

'to update do the following

rs.update "name","Elija"
rs.update "Age",27
rs.update "Address","Abuja"

' to delete
rs.delete

at the end

rs.close

let me know if you have any problem

Plz reduce how you program in access use either MySql or SQLserver,Oracle

  I am currently developing an account system [savings account] prototype using vb 6.0, although the scope is limited to only making deposits, withdrawals    i have a slight problem with the account statement form   How can previous updates on any given particular account be saved, such that when I want it to generate a statement of account for any given account number, all previous transactions that were carried out by the client or customer would be shown on the form or report?  THANKS FOR YOUR HELP.

    Thanks so much for the help  I will implement this ASAP 

No more Questions?

Hey N'landers,
How would I search for a record in a database from the run time in VB 6.0
The database I used was Access. I would type one of the fields of the record in a text box and it would return the full details of the record.
I'll be expectin the reply

PLEASE KINDLY HELP ME WITH HOW TO DESIGN A VB FORM THAT WILL TAKE IN PICTURE AND KEEP IN A DATABASE FOR NOW AN ACCESS DATABASE WILL DO.
PLEASE I WILL APPRECIATE IT IF YOU CAN BE DETAILED.
TANKX SO MUCH I REALLY APPRECIATE THE WORK U GUYS ARE DOING. U R GOING PLACES FOR SUREE.TANKS SO MUCH
PLS ONCE AGAIN BE EXPLICIT AS I AM JUST COMING UP IN VB PROGRAMMING.

Great programmers! Need help on how to impliment a Computer Draw.
I will enter  say texts or numbers into Vb object say combo
on clicking a button the data entered shld be randomised and one picked out from the rest.
On clicking a button another one will be picked out
Any one picked out leaves the column so that it will not be picked again

Hoping to hear 4m u
thanks and Happy New Year(Bon Anee)

chukz4real
since you are on internet you can conveniently download materials which will be of use to you. If you want to fully utilize OPP do use C# or VB.Net.
How do be a good programmer to choose any program and start developing it. You may start writing non-database program to enable you master Keywords and syntaxes later you start by writing Database program. Choose any topic on the process you will learn. Stop procastinating or feeling that it is not too needed in your profession nor it is too hard and you must get somebody to train you before you learn. That is best way not to be a good programmer.

The best programmers dont learn in class room, they concentrate and discover most by themselves. Remember there is no magic in computer and everything in computer has sequence otherwise syntax error.

You can learn easily when you have a problem say a class that will enable you print report. After geting that, the whole lot of problems about printing is solved then you proceed to another one.
Join forums where you can download codes, modify and plug them into your programs.

Am not in Lagos neither PH but we can meet online as you said.

Do let me know that particular keyword you want to use or you need which refuses you and what you want to achieve with that keyword I could be of help.
cheers!

i really want to commend you,luckyco on how to try to profer solutions to questions.More power to your elbow. I am trying to develop a program using vb6 in which i would create a table(more of a data table) on a form in which computations could be made in the table along rows to give a final result and the table will be linked exactly to an excel table which could be printed.If it is not possible,you could tell me how i could achieve this possibly with another program. Thanks.

Great Job LuckyCO:
Ever tried FireBird for DB? if not why not give it a try as I think it's an easier database than other referrences given. http://firebirdsql.org/
 
You really are doing a great JOB. Kudos to you, keep the good work.

I have sent this file because you have taken so much time in letting me know what you need.
Call this sub program and assign Mhs with MSHFlexgrid and KIM is optional representing row where you want to start exporting the file.

Thanks Help it will help you.


Public Sub PrintMsh(Mhs As Control, Optional KIM As Integer)
If MsgBox("Are you sure you want to export the data to excel", vbQuestion + vbYesNo, "Choose either yes or no") = vbNo Then Exit Sub

On Error GoTo errh
Dim D As Object, k As Long, J As Long
Set D = CreateObject("Excel.Application")
D.Visible = True
D.WORKBOOKS.Add
Dim II As Long
Dim i9 As Long

Dim i8 As Integer
i8 = CInt(Mhs.Rows / 65536) - 3
For k = 1 To i8
D.WORKSHEETS.Add
Next k

i8 = 1
i9 = 65536
II = 1
Dim M As Long
M = 1
Dim DF0 As Integer
If KIM <> 0 Then DF0 = KIM + 1

If KIM = 0 Then DF0 = KIM + 1

For k = 0 To Mhs.Rows - 1
If k = i9 Then
II = II + 1: i9 = i9 + 65536: M = 1
If II = i8 Then i8 = i8 + 1:

D.WORKSHEETS(II).Columns.Font.Size = 8
D.WORKSHEETS(II).Rows(1).Font.Bold = True
D.WORKSHEETS(II).Rows.AutoFit
D.WORKSHEETS(II).Columns.AutoFit
End If



For J = 1 To Mhs.Cols - DF0

D.WORKSHEETS(II).CELLS(M, J + 1) = Trim(Mhs.TextMatrix(k, J))

Next J

D.WORKSHEETS(II).CELLS(M, 1) = M - 1
M = M + 1
Next k

D.WORKSHEETS(II).CELLS(1, 1) = "S/N"

D.WORKSHEETS(II).Columns.Font.Size = 8
D.WORKSHEETS(II).Rows(1).Font.Bold = True
D.WORKSHEETS(II).Rows.AutoFit
D.WORKSHEETS(II).Columns.AutoFit
Exit Sub
errh:
End Sub

I AM A VB6 PROGRAMMER. IF U NEED ANY HELP JUST CONTACT ME. kunlee22ng@yahoo.com, if_shittle_then@yahoo.com,08032578656

I WANT TO KNOW WHERE I CAN DOWNLOAD VB6 SOFWARE.

Hope we don have much problem?
Anyway, if I have not answered your questions due to the time my Internet  was down can still repost them such that I will answer them.
Thanks