Search
Language: Visual Basic
8213 reads
In this program you will learn how to connect to the database using Data Environment. This is one of the features of Visual Basic to easily connect to the database without hard coding.
If you are familiar with MS Access you will most likely find it easy to deal with Data Environment. By using Data Environment you can easily drag fields from command object to your form. You can also create command based on stored procedures, tables, views, synonyms, and SQL statements.
Another feature is how you relate child form from the parent form. This can be done by relating one or more Command objects together.
Download Code
Your Vote!
Note
Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. After downloading it, you will need a program like Winzip to decompress it.
Virus note:All files are scanned once-a-day by SourceCodester.com for viruses,but new viruses come out every day, so no prevention program can catch 100% of them.
FOR YOUR OWN SAFETY, PLEASE:
1. Re-scan downloaded files using your personal virus checker before using it.2. NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
- 8213 reads
Relevant Content
- Data Report and Data Environment
- Creating Reports in vb6
- rOSALIE SIMPLE iPHONE style phonebook - UPDATED WITH BUTTONXP.OCX
- Complete Inventory System v1.0
- Automated Identification System (johnfamouz)
- DESKTOP LOCK ON BOOT ver2
- Birthdate using DTPicker versus Comboboxes
- Search with listview
- Data Entered Duplication
- Pc Timer-Shutdown/Restart/LogOff
data report in vb6
i have created a data report in vb6 with data environment. it is running ok. but the problem is when i want to change the connection of the data report to the database.
i have many database and i want a single report to display their contents by choosing from a list what database to use.
can you send me a sample of how to do this.
thanks,
Dadang
Need Help
Hi, I'm am currently doing my internship in a company. My topic is Museum Management System which has to deal with some RFID technology. However, I'm very new in IT field, it's kind of difficult for me to do it. I'm wondering if you can guide me? I hope to keep in touch with you. Thank you
COMPUTERIZED INVENTORY SYSTEM
HI SIR I JUST WANNA ASK HOW TO CONNECT COMBO BOX IN DATA REPORT.. I HAVE A PROBLEM HERE THAT MY COMBO BOX WHICH IS IN OTHER FORM CANNOT CHANGE THE SQL STATEMENT THAT IS ON MY DATA ENVIRONMENT.. THE SITUATION IS THAT I HAVE A FORM WHICH HAS RECORDS OF COMPUTER COMPONENTS REGARDING WHAT LOCATION WERE ARE THEY ... EXAMPLE THE LOCATION IS IN ROOM 401, IT SHOULD CHANGE THE SQL STATEMENT INTO "SELECT * FROM INVENTORY WHERE LOCATION = "ROOM 401" SO THAT WHEN I PRINT RECORDS THEY ARE IN BY ROOM ORDER... THNX
REPLY ME AT MY EMAIL...
windtalkers26@gmail.com
thnnnxx a lot sir...
KEITH
hai jay its viji
i need the simple data base connection coding for VB with oracle data base and i need the explanations also can u send me that in my id
viji.m@rediffmail.com
thanks jay
Hi
how to put edit?
help me with this code plz
hi i have made this program and im facing a problem in the search button im using VB6 and data environment with access 2003
i need to search by first name only or sirname from the whole name plz plz help here the code :
Private Sub Command2_Click()
y = InputBox(" enter the name plz ")
If y = vbCancel Then
Exit Sub
ElseIf DataEnvironment1.rsCommand1.RecordCount = 0 Then
MsgBox ("no data")
ElseIf y <> "" Then
DataEnvironment1.rsCommand1.MoveFirst
DataEnvironment1.rsCommand1.Find "Name = '" & y & " ' "
On Error GoTo picer
x = "c:\pix\" + Text1.Text + ".jpg"
Image3.Picture = LoadPicture(x)
picer:
Exit Sub
If DataEnvironment1.rsCommand1.EOF Then
MsgBox ("not registed")
DataEnvironment1.rsCommand1.MoveFirst
End If
End If
End Sub
PLEASE HELP SIR JAY
Hi sir jay can you please help me with a call login system i've been trying the whole month and i still can't the windows application to communicate with the database on visual studio. my email is madjack@live.co.za. thanx in advance
Payroll for "NUMAN" Co.
sir can you please give me a sample Payroll system in VB6.0
here is my e-mail: fran_silatory@yahoo.com thanks a lot..
hi
please help me in my software project,,i cant do this program,.. the amplitude exam..vb6 with 2003 access.please sir help me..sir email me benzkim89@yahoo.com...thank you
help
Any source code for an Electricity Billing System using Visual Basic with a Ms Access Database?
raw material
i need the code which make to me the stock out and in from date to date otherwise that colcolat the stock from the date and to date i write it in pick
thanks
ameer
GooD Effort
Thanks
raw material
help me please i have program in vb6 for raw material i need code for date
when i write this day's date the report show me stock out from the begening until today and also stock in and stock now, because my program does not show me the total it's show the stock out , stock in and balance for the date that i write it only please help me for that and thank you very mutch
amer
albatool2007@yahoo.com
yemen
re: raw material
Without seeing your code I think it's hard for me to help you.
raw material
i send the code to and i have not recieved your reply can please send the code to my private e-mail
albatool2007@yahoo.com
amerr
raw material
dear admin
can you please help me about this subject i sent the code and this problem can select fanction solve it can you make it please and send it to me i am very hurry about this
p.s.
i need colcolate stock out and stock in from date to date which i select it in pick1 and pick2 for example .
thanks alot
ameer
raw material
Dim obj, rs As ADODB.Recordset, sql As String
Set rs = New ADODB.Recordset
If Ddate.Value <> "" Then
sql = "SELECT * FROM store ORDER BY [ProductID]" _
End If
rs.Open sql, cn, adOpenStatic
If Not rs.EOF Then
'Set DataReport1.DataSource = rs.DataSource
Set DataReport2.DataSource = rs.DataSource
For Each obj In DataReport2.Sections("Detail").Controls
If TypeOf obj Is RptTextBox Then
obj.DataMember = rs.DataMember
End If
Next
DataReport2.Sections("Detail").Controls("Text1").DataField = "DateAlias"
DataReport2.Sections("Detail").Controls("Text2").DataField = "ProductID"
DataReport2.Sections("Detail").Controls("Text3").DataField = "ProductName"
DataReport2.Sections("Detail").Controls("Text4").DataField = "TotalQty"
DataReport2.Sections("Detail").Controls("Text5").DataField = "TotalQty_SO"
'DataReport1.Sections("Detail").Controls("Text6").DataField = "tot1"
'DataReport1.Sections("Detail").Controls("Text7").DataField = "TotalQty_SR"
DataReport2.Sections("Detail").Controls("Text8").DataField = "Balance"
'DataReport1.Refresh
'DataReport1.Show
'Set rs = Nothing
DataReport2.Show vbModal
End If
End Sub
sorry for dely reply up is the but i need when i select date in Ddate ineed in report to colcolate the stock out field from begening 2010 to that date i select it and other field also like stock in and balance can you please help me and send me as soon as possible
thanks alooooooooooooooooooooooot
amer
yemen
source codes
hi there... i am a visual foxpro programmer, i wanna learn some techniques in programming visual basic 6.0. can you send me a simple program regarding payroll system written in vb6.0? thanks and more power to your blogs.
ynnoswafu@yahoo.com.ph
laiza_chai18@yahoo.com
sir do you have a codes of custom system!!! we need it tomorrow.
thankz in advance............!
school management system
I want to develop " School management system in visual basic" so i need some help from your side.
Thank you
re: school management system
Give it a shot.
Sir Jay
Sir meron ka po bang combo box kapag pumili ako sa combo box yung mga details niya lalabas sa datagrid? help nman po salamat
re: Sir Jay
Send me the database and I will create this for you.
Sir Jay
Sir Jay,
Na send ko na po yung database nasa book ko na send eh hindi ko lam kung pano mag send sau eh.
thanks for the time
re: Sir Jay
I actually uploaded the project. Please take a look at this link: http://www.sourcecodester.com/tutorials/visual-basic-net/display-record-datagridview-based-combobox-selected-value.html.
And please next time obey the rules. Write in English only. Thank you
Thanks Sir Jay
Thanks you Sir Jay,
one more question can i convert this to vb6?
re: Thanks Sir Jay
Yes only if you know how to convert it.
re: Thanks Sir Jay
Thanks Sir Jay, i will search for the convertion ofthat
re: Thanks Sir Jay
i will search for the convert vb.net to vb6 thanks sir
Sir Jay
sir Jay i dnt know how to convert vb.net to vb6
HELP ARE THERE REGULAR EXPRESSION IN VB.NET?
HELP ME PLEASE.. I WANT TO KNOW IF THERE IS A REGULAR EXPRESSION IN VB.NET. IF THERE IS, I WANT TO KNOW HOW TO USE IT.. THANK YOU VERY MUCH..
-bernadeth
re: ONLINE HOTEL RESERVATION SYSTEM
Sorry but I'm too kinda busy right now.
NEED YOU HELP
Hey jay i know ur kinda busy. during your free time pliz spare some time and bail me out. i shall be gratefull. by the way i find the hotel reservation system using vb 6.0 an excellent work you did. all the areas are covered. ciao
ONLINE HOTEL RESERVATION SYSTEM
Hi i recently sent out a msg but i wasn't sure whether you got it. My request was that kindly assist me with the online hotel reservation and booking system using php,Mysql,html etc . i shall be grateful. ciao let me know ASAP
Post new comment