Dim strValue As String strValue = txtValue1.Text Dim rs

How to compare inserted text in (textbox1.text) with
existing database value in (Sqldatasource1) in visual
studio 2005 ?

Question Posted / amol

1 Answers
5874 Views
I also Faced
E-Mail Answers

Answer Posted / amol

Dim strValue As String
strValue = txtValue1.Text

Dim rstData As ADODB.Recordset
rstData = New ADODB.Recordset

rstData.Fields.Append("A",
ADODB.DataTypeEnum.adInteger, 0,
ADODB.FieldAttributeEnum.adFldKeyColumn)
rstData.Fields.Append("B",
ADODB.DataTypeEnum.adVarChar, 10,
ADODB.FieldAttributeEnum.adFldIsNullable)
'rstData.Fields.Append("C",
ADODB.DataTypeEnum.adVarChar, 0)

rstData.Open()
rstData.AddNew()
rstData.Fields("A").Value = "1"
rstData.Fields("B").Value = "Amol"
rstData.Update()
rstData.MoveFirst()
If UCase(Trim(rstData.Fields("B").Value)) =
UCase(Trim(strValue)) Then
MsgBox("True")
Else
MsgBox("False")
End If

Is This Answer Correct ?

3 Yes

2 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

Is it posible to Create Tables Through Querydef?

2058

How would you add elements in TreevieW Control.

2147

What are the uses of List View Control?

1899

What is form in visual basic?

983

How do I call help files from a VB program?

1409

Explain the "cursortype" and "Locktype" in VB?

4544

Types of LockEdits in DAO?

2081

Clear property is available in ____,___ control.

1560

Is visual basic c#?

921

How do I get my application on top?

1418

Explain about literals?

982

Is the Access Engine and Visual Basic Pro good enough for database work?

1658

Explain about declaring variables in Visual basic?

1061

What is controls in vb?

992

Which language is used in visual basic?

1001