<div>
With Adodc3.Recordset <br />
&nbsp; .Find &quot;SITE_NAME = '&quot; &amp;&nbsp;TEXT17.text &amp;&nbsp;&quot;'&quot; <br />
&nbsp; &nbsp;If Not .EOF Then <br />
&nbsp; &nbsp; 'Record was found <br />
&nbsp; &nbsp; X = MsgBox(&quot;Applications Have ready been scheduled&quot;, vbOKOnly) <br />
&nbsp; &nbsp; Exit Sub <br />
&nbsp; Else <br />
&nbsp; &nbsp; 'Record not found <br />
&nbsp; End If <br />
End With 
</div>


With Adodc3.Recordset
  .Find "SITE_NAME = '" & TEXT17.text & "'"
   If Not .EOF Then
    'Record was found
    X = MsgBox("Applications Have ready been scheduled", vbOKOnly)
    Exit Sub
  Else
    'Record not found
  End If
End With

<div>
sorry about that post. &nbsp;my friend in the computer lab thought he'd play around on my comp til i got back. &nbsp;hes not a vb programmer (obviously)
</div>


sorry about that post.  my friend in the computer lab thought he'd play around on my comp til i got back.  hes not a vb programmer (obviously)

<div>
THANKS RUCHI'S AND THE OTHERS Looks like it was a race for the points.<br />
<br />

</div>


THANKS RUCHI'S AND THE OTHERS Looks like it was a race for the points.



<div>
<div class="content wysiwyg-content">
How do I do a search on the recordset from a value inputed in a text box??<br />
below is my example, &nbsp;the way it is, it searchs for text17.text as the sitename.<br />
<br />
please help<br />
<br />
With Adodc3.Recordset<br />
&nbsp; .Find &quot;SITE_NAME = 'TEXT17.text'&quot;<br />
&nbsp; &nbsp;If Not .EOF Then<br />
&nbsp; &nbsp; 'Record was found<br />
&nbsp; &nbsp; X = MsgBox(&quot;Applications Have ready been scheduled&quot;, vbOKOnly)<br />
&nbsp; &nbsp; Exit Sub<br />
&nbsp; Else<br />
&nbsp; &nbsp; 'Record not found<br />
&nbsp; End If<br />
End With<br />
<br />
<br />
<br />
<br />

</div>
</div>


How do I do a search on the recordset from a value inputed in a text box??
below is my example,  the way it is, it searchs for text17.text as the sitename.

please help

With Adodc3.Recordset
  .Find "SITE_NAME = 'TEXT17.text'"
   If Not .EOF Then
    'Record was found
    X = MsgBox("Applications Have ready been scheduled", vbOKOnly)
    Exit Sub
  Else
    'Record not found
  End If
End With






Help on ADO.RS.FIND

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.