VB.NET

How to select a value in the database

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Jun 2009

Posts: 4

Reputation: jetjash is an unknown quantity at this point

Solved Threads: 0

jetjash

Offline

Newbie Poster

How to select a value in the database

Nov 3rd, 2009

Using VB.NET

I am using Combobox, when i select the value in combobox, the date value should display in datetimepicker where date = combobox id

vb6 code

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
cmd.CommandText = "select distinct Name from T_Person where personid = '" & txtno & "'"
Set rs = cmd.Execute
While Not rs.EOF
   If Not IsNull(rs("Name")) Then
txtName.Text = rs("Name")
       rs.MoveNext
    End If
Wend
cmd.CommandText = "select distinct Name from T_Person where personid = '" & txtno & "'"
Set rs = cmd.Execute
While Not rs.EOF
   If Not IsNull(rs("Name")) Then
txtName.Text = rs("Name")
       rs.MoveNext
    End If
Wend

txtno - combobox, txtname = datetimepicker1

The above code is working in vb6, But am new to vb.net

How to modify my code in vb.net

Need vb.net code help

•

Join Date: Aug 2009

Posts: 94

Reputation: yorro has a little shameless behaviour in the past

Solved Threads: 6

yorro

Offline

Junior Poster in Training

Nov 3rd, 2009

 Help with Code Tags 
 vb Syntax (Toggle Plain Text) 
            Dim myDA As New OleDbDataAdapter
 
            myCmd.CommandText = "select distinct Name from T_Person where personid = '" & txtno & "'"
            myDA.SelectCommand = myCmd
            myDR = myCmd.ExecuteReader()
            While (myDR.Read())
                    myDR("Name"))
            End While
            Dim myDA As New OleDbDataAdapter
            
            myCmd.CommandText = "select distinct Name from T_Person where personid = '" & txtno & "'"
            myDA.SelectCommand = myCmd
            myDR = myCmd.ExecuteReader()
            While (myDR.Read())
                    myDR("Name"))
            End While

•

Join Date: Sep 2009

Posts: 320

Reputation: TomW is on a distinguished road

Solved Threads: 44

TomW

Offline

Posting Whiz

Nov 3rd, 2009

I dont understand the need for a loop to assign control values when only a single value can be displayed in the textbox and datepicker at a time. Also Im a bit confused by the naming conventions, a prefix for txt for a datepicker and your saying your looking for a date but the select statement shows your querying a field named "Name".

•

Join Date: Nov 2009

Posts: 1

Reputation: JAM1011 is an unknown quantity at this point

Solved Threads: 0

JAM1011

Offline

Newbie Poster

Same Problem

Nov 3rd, 2009

I have the same problem I am trying to read distinct values from an Access table but i get a syntax error. heres my code . The Code works fine until I put in the distinct key word.

Help with Code Tags

VB.NET Syntax (Toggle Plain Text)

sql = "SELECT DISTINCT Model,Make,Problem,HP FROM Makes"

can anyone point me in the right direction.

thanks
james

Last edited by JAM1011; Nov 3rd, 2009 at 8:21 pm.

•

Join Date: Feb 2009

Posts: 3,344

Reputation: sknake has much to be proud of

Solved Threads: 602

sknake

Offline

.NET Enthusiast

Nov 3rd, 2009

Your SQL syntax is invalid. Typically you use Distinct() on a single column. I'm not sure if this is the exact syntax with Access but this is how it would work in MSSQL:

 Help with Code Tags 
 sql Syntax (Toggle Plain Text) 
SELECT Model, Make, Problem, HP
FROM Makers
GROUP BY Model, Make, Problem, HP
ORDER BY Model, Make, Problem, HP --This is an optional ordering line
Select Model, Make, Problem, HP
From Makers
Group By Model, Make, Problem, HP
Order By Model, Make, Problem, HP --This is an optional ordering line

It should be similar for access.

Last edited by sknake; Nov 3rd, 2009 at 9:13 pm.

Scott Knake
Custom Software Development
Apex Software, Inc.

Thread Tools	Search this Thread
Show Printable Version Email this Page

DaniWeb Message

Cancel Changes