Solved

Select statement in VB.NET for SQL Mobile not working... works in Query Analyzer

Posted on 2009-07-14
2
440 Views
Last Modified: 2013-12-05
I can run the following statement in Query Analyzer and get the result I am looking for.  However, when I run it in VB.NET, I get no results.  Why?

SELECT STR_NAM From LocID Where STR_NAM like '%ROAD%'
Public Shared Function GetLocs() As DataSet

 

        ' Return set of locations based on search criterion entered on LocInqScreen

 

        ' Create a connection to the Mobile SQL database

        Dim PAConnection As New SqlCeConnection

        PAConnection.ConnectionString = "Data Source =""Program Files\HTE_Apps\CT Database.sdf"""

 

        ' Define a Query and Adapter to select this screen's controls from the database

 

        'Define select string

        Dim SelectLocs As String = "SELECT STR_DIR as DIR, STR_NUM as NUM, STR_NAM as STREET, STR_SFX as SFX, CITY, STATE, ZIP, LOC_ID From LocID Where"

 

        'Define select string for each search criteria entered

 

        'Street Name

        If LocInqScreen.gSTR_NAM > "" Then

            SelectLocs = Trim(SelectLocs) + " STR_NAM like '%" + Trim(LocInqScreen.gSTR_NAM.ToString) + "%' "

        End If

 

        Dim adapter As SqlCeDataAdapter = New SqlCeDataAdapter(SelectLocs, PAConnection)

 

        ' Initiate a Dataset to contain the table returned

        Dim result As New DataSet

 

        'Fill the dataset

        PAConnection.Open()

        adapter.Fill(result, "LocID")

        PAConnection.Close()

 

        ' Return the dataset

        Return result

 

    End Function

Open in new window

0
Comment
Question by:gregdoyon
2 Comments
 
LVL 15

Accepted Solution

by:
JackOfPH earned 500 total points
ID: 24855636
Try this one...

Trim(SelectLocs) & " STR_NAM like '%" & Trim(LocInqScreen.gSTR_NAM.ToString) & "%'"
0
 

Author Closing Comment

by:gregdoyon
ID: 31603519
Solved the problem
0

Featured Post

Highfive Gives IT Their Time Back

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

This is an article about Leadership and accepting and adapting to new challenges. It focuses mostly on upgrading to Windows 10.
Possible fixes for Windows 7 and Windows Server 2008 updating problem. Solutions mentioned are from Microsoft themselves. I started a case with them from our Microsoft Silver Partner option to open a case and get direct support from Microsoft. If s…
This Micro Tutorial will give you a basic overview of Windows DVD Burner through its features and interface. This will be demonstrated using Windows 7 operating system.
With the advent of Windows 10, Microsoft is pushing a Get Windows 10 icon into the notification area (system tray) of qualifying computers. There are many reasons for wanting to remove this icon. This two-part Experts Exchange video Micro Tutorial s…

757 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

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now