Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

How to check if the records are exist in table and store it on another table?

Posted on 2009-07-14
5
Medium Priority
?
245 Views
Last Modified: 2012-05-07
I have already a form in VB.net with textbox1.text and buttons from 0 to 9 (as calculator). I would like to have my textbox1.text asking a question three times inside the text itself Enter STD ID , Enter SS ID Enter car #  and check the entering in the database if it is exits or not !
1- If it is exist;
Save him in the table called sign and give him a seat from (1 to 5) if the seat is available and if not let him wait?
con.Open()
 
        MsgBox("A Connection to the Database is now open")
 
        Dim ds As New DataSet
        Dim da As OleDb.OleDbDataAdapter
        Dim sql As String
 
        sql = "SELECT * FROM table"
        da = New OleDb.OleDbDataAdapter(sql, con)
        da.Fill(ds, "northwind")
 
.
.
.
.
.
 
 
con.Close()

Open in new window

calc.jpg
0
Comment
Question by:aiman_alnasir
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 83

Accepted Solution

by:
CodeCruiser earned 750 total points
ID: 24848227
I dont understand your question fully but here is an example of how to check if a record already exists in database.


Dim dbcon as new OleDBConnection(connectionstring)
dbcon.open
Dim dbcmd as new OleDBCommand
dbcmd.connection = dbcon
dbcmd.commandtext = "Select Count([Name]) From [Employee] Where [Name]='" & txtName.Text & "'"
Dim Count as Integer = dbcmd.ExecuteScaler()
If Count > 0 Then
   Messagebox.show("This Employee already exists")
End If
dbcmd.dispose
dbcon.dispose

Open in new window

0
 

Author Comment

by:aiman_alnasir
ID: 24848459
This is a good step to start;
Could you please see my code below and fix any errors;
.
.
.
Dim Show1, Show2, Show3 As String
        Show1 = InputBox("Enter STD ID Number: ")
        a = Show1
        Show2 = InputBox("Enter SS ID Number: ")
        b = Show2
        Show3 = InputBox("Enter car Number: ")
        c = Show3

        dbcmd.Connection = con
        dbcmd.CommandText = "Select Count(*) From table Where STD ='" & a & "' and SS = '" & b & "' and car = '" & c & "'"
        ' please note the error message (ExecuteScaler is not a member of System.Data.OleDb.OleDbCommand)    
        Dim Count As Integer = dbcmd.ExecuteScaler()
        If Count > 0 Then
            MessageBox.Show("This Employee already exists")
        End If
        dbcmd.Dispose()
0
 
LVL 83

Assisted Solution

by:CodeCruiser
CodeCruiser earned 750 total points
ID: 24848657
My typo
Its
dbcmd.ExecuteScalar()
0
 

Author Comment

by:aiman_alnasir
ID: 24856745
Thanks dude,
Now, do you know some code to reserve a space or a seat or a time per day on VB.net? So, whenever the students are available on the database it will allow him to reserve a specific time or seat. For example, if we have 5 seats, 5 students are allow to pick one seat for each and any other students who came after will keep him in the waiting list.
0
 
LVL 83

Assisted Solution

by:CodeCruiser
CodeCruiser earned 750 total points
ID: 24857577
There is no quick code for that functionality. This is what your application will be doing and you need to implement it based on the requirements.
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Article by: jpaulino
XML Literals are a great way to handle XML files and the community doesn’t use it as much as it should.  An XML Literal is like a String (http://msdn.microsoft.com/en-us/library/system.string.aspx) Literal, only instead of starting and ending with w…
Well, all of us have seen the multiple EXCEL.EXE's in task manager that won't die even if you call the .close, .dispose methods. Try this method to kill any excels in memory. You can copy the kill function to create a check function and replace the …
This is my first video review of Microsoft Bookings, I will be doing a part two with a bit more information, but wanted to get this out to you folks.
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…

715 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question