Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Oct 1, 1996

Using Seek Method

Question:
I am currently migrating my VB/Access application to Microsoft SQL Server. However, the "SEEK" function in my old program does not work any more and I can not find any function to replace that.

Answer:
Somewhere in your code you used one of the Find methods when you were looking through your database. If you are using ODBC to connect to SQL Server, Find methods are not allowed on recordsets created from ODBC databases. The workaround is just to Move through a snapshot/recordset and compare your search criteria against each record. Here is an example:

   Dim ssData as Snapshot
   Set ssData = DB.CreateSnapshot("table_name")
   Do While Not ssData.EOF 
      If ssData("FieldName") = "criteria" Then
         MsgBox "Found record in recordset"
         Exit Do
      End If
      ssData.MoveNext
   Loop
The other, probably much faster, way to perform the same action is to query the database with a SQL statement, such as "SELECT * FROM table WHERE field=criteria"
DevX Pro
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date