How to connect to a Database

Here is a sample code of how to connect to a database

this code is for microsoft access 2003

Imports system.Data.OleDb
Module Module1
    Public dbpath As String = Application.StartupPath + "\dbBilling.mdb"
    Public cnstring = "Provider = Microsoft.Jet.Oledb.4.0;Data Source =" & dbpath
    Public con As New OleDbConnection(cnstring)
End Module

sample Login in VB.net 2008

after a long long time of no post, here is a sample of login program in vb.net

this program have still bugs , and if you found one, post it here. Thanks


Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
        Dim ds As DataSet = New DataSet()
        Dim dr As OleDbDataReader
        Dim da As OleDbDataAdapter = New OleDbDataAdapter
        Try
            con.Open()
            Dim dc As OleDbCommand = New OleDbCommand("Select * From UserAccounts ", con) 
            dr = dc.ExecuteReader()
            With dr
                If .HasRows Then
                    While .Read()
                        If (.Item("UserName").ToString = UsernameTextBox.Text) And (.Item("Password").ToString                          = PasswordTextBox.Text) Then
                            Dim a As String = .Item("UserName").ToString
                            Dim a1 As String = .Item("Password").ToString
                            Form1.Show()
                            .Close()
                            Exit While
                        End If
                    End While
                    Dim b As String = .Item("UserName").ToString
                    Dim b1 As String = .Item("Password").ToString
                    MsgBox("Username or Password is Incorrect", MsgBoxStyle.Critical + MsgBoxStyle.OkOnly)
                    UsernameTextBox.Text = ""
                    PasswordTextBox.Text = ""            
                End If
            End With
            con.Close()
        Catch ex As Exception
        End Try
        con.Close()
    End Sub

Java Founder Quits Oracle

The founder of JAVA language quits oracle after the Oracle bought the Sun Microsystems. Well for us James Gosling is the Father of Java since he is the one who made the java language.

Here are the details from another website v3.co.uk

James Gosling, considered by most to be the father of the Java programming language, has announced he is no longer working for Oracle.Gosling's unexpected departure follows that of Sun chairman Scott McNealy in January and Jonathan Schwartz a month later and backs up reports that the old guard at Sun are having trouble fitting into the new regime. Gosling refused to explain his sudden departure at this time.“Yes, indeed, the rumours are true: I resigned from Oracle a week ago (April 2nd),” said Gosling in his blog.

“As to why I left, it's difficult to answer: Just about anything I could say that would be accurate and honest would do more harm than good. The hardest part is no longer being with all the great people I've had the privilege to work with over the years. I don't know what I'm going to do next, other than take some time off before I start job hunting.”

He also apologised to TechDays attendees in St Petersburg, where he had been due to appear on Thursday, saying he hated not being there.Gosling joined Sun in 1984 and invented the original Java code, virtual machine and compiler. Hugely popular both inside Sun and among developers the loss of Gosling will be keenly felt, and will heighten concerns about Oracle's commitment to Java and open source coding.

 This will be a great loss. Since he is no longer works for the company who made java a great success.

Upcoming Posts

On my next post, I will teach you on how to create a sample of a file maintenance system, and this will include  generation of reports. Also on my next post the softwares used is MS SQL Server 2005, VS 2005 and Crystal Reports 11. If you want to have this softwares just tell me and I am gladly to post the links for download of these softwares.

Demonoid Codes

I will be giving 5 invitation codes. But please follow the rules and regulation of demonoid. In torrents mostly on demonoid, you cannot be always downloading files, you must be able to seed also, not LEECH, so if you cannot seed then you cannot join demonoid.

If you are willing to help to seed more in demonoid , i will give you the invitation code.

in order to give you the code you must comply with me.
1. Email me through your main email account
2. tell me your username
3. follow the rules
4. Contact info
you can email me here. lickweed_21@yahoo.com

Adding items in combo boxes from mysql database in vb.net

In this post, I will give some sample codes on how to populate your combo box from your database using datasets.

In this example code, I will use MYSQL as my database and VB.net 2005 teamsuite.

First part of the code: we write a code on setting up a connection on our database and here it is.

Dim dataset1 As DataSet = New DataSet
Dim dataadapter1 As MySqlDataAdapter = New MySqlDataAdapter

Dataset this is where we will put all the data that we will get from our datasources
Dataadapter this is our connection or bridge to our connection object and our dataset


2nd part : Getting the data from the database

Dim msql As String = "Select EmpId from tblempinfo" 'SQL query to select what data will be shown in the combo box
myda1.SelectCommand = New MySqlCommand(msql, mysqlcon) 'will trigger the selected sql query to get the data we needed

3rd Part: filling up the Combo box

myda1.Fill(myds1) 'the data adapter will fill our dataset to hold the data
cboEmp.DataSource = myds1.Tables(0) 'this code will connect the combo box and the database using datasets ,setting up a data source.
cboEmp.DisplayMember = "EmpId" 'this will filter what data to be displayed on the combo box
cboEmp.ValueMember = "EmpId" 'this will set or get the actual value of the displayed member.

I hope this sample code will help you

Enjoy Coding.



On the next post : setting up the reports from the selected value on the combo box

Crystal Reports VB.net how to connect them

In this post, this will show you how to connect these 3 programs namely : VB.net , Crystal Reports XI, first is you can add a crystal report viewer object so that it can browse some crystal report files , then after adding the viewer, you can now set the report source of the viewer either by wizard or by coding it.

the sample code is like this

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
If ComboBox1.SelectedIndex = 0 Then
Me.Close()
Form2.Show()
Form2.CrystalReportViewer1.ReportSource = Application.StartupPath + "\reports\CrystalReport3.rpt"
Else
Form2.Show()

this code above will set the report source or the report that will be printed on the report viewer depending on what the user selected in the combo box.

Form2.CrystalReportViewer1.SelectionFormula() = "{tblsched.EmpId} = '" & TextBox1.Text & "'"
Form2.CrystalReportViewer1.ReportSource = Application.StartupPath + "\reports\CrystalReport2.rpt"
End If
End Sub

the 2nd quoted code shows what data will be shown depending on the value of the textbox then you can choose what report will be printed by selecting an item in the combo box.


Note: You can add you created reports in the vb.net proj so that it will accept the application.startuppath code, you can place the reports inside the bin directory

if there's some problem in this tutorial just post here your comment or leave a message

enjoy coding!!

Welcome

Guys

this blog is all about helping newbie programmers out there, i hope this blog will help you and if you have some problems regarding in your programs you can post it here and i would gladly help you