Select......Like

[Guest]

Hi, I want to build a Select sentence with a LIKE "PartOrACode*" option but I
dont know where to put the "*", the key field is txt and the sentence I have
is :

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice, tblComputers.Warranty,
tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE """ &
[Forms]![frmComputers]![Text12] & """"

Forms!frmComputers.RecordSource = Sql

Thanks

 

[Dirk Goldgar]

In

Hi, I want to build a Select sentence with a LIKE "PartOrACode*"
option but I dont know where to put the "*", the key field is txt and
the sentence I have is :

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice,
tblComputers.Warranty, tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE """ &
[Forms]![frmComputers]![Text12] & """"

Forms!frmComputers.RecordSource = Sql

Try this:

Sql = _
"SELECT " & _
"AssetTag, ManufacturerID, DateReceived, " & _
"PurchasePrice, Warranty, EmployeeID " & _
"FROM tblComputers " & _
"WHERE " & _
"AssetTag LIKE """ & [Forms]![frmComputers]![Text12] & "*"""

Although personally, I prefer to use Chr(34) instead of those long
strings of doubled-up quotes:

"WHERE AssetTag LIKE " & _
Chr(34) & _
[Forms]![frmComputers]![Text12] & "*" & _
Chr(34)

 

[Guest]

Try

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice, tblComputers.Warranty,
tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE '" & [Forms]![frmComputers]![Text12]
& "*'"

Forms!frmComputers.RecordSource = Sql

 

[Dirk Goldgar]

In

Try

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice,
tblComputers.Warranty, tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE '" &
[Forms]![frmComputers]![Text12] & "*'"

Using a single-quote (') as the text delimiter in the SQL string
simplifies things a lot, provided you are confident that the literal
value being embedded doesn't contain that character. I tend to use
double-quotes (") habitually, as they are much less common.

 

[Guest]

Thanks, the routine works, but let say I place Data entry to yes, because I
dont want to se the first register in screen when I fill the text box with
the code and and click in the command button that have the code you show me,
the Select doesn't works, but if I move Data Entry to NO (It shows the first
register) work perfect.

Any Ideas how to fix this problem?

Thanks

Try

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice, tblComputers.Warranty,
tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE '" & [Forms]![frmComputers]![Text12]
& "*'"

Forms!frmComputers.RecordSource = Sql


--
Good Luck
BS"D

Hi, I want to build a Select sentence with a LIKE "PartOrACode*" option but I
dont know where to put the "*", the key field is txt and the sentence I have
is :

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice, tblComputers.Warranty,
tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE """ &
[Forms]![frmComputers]![Text12] & """"

Forms!frmComputers.RecordSource = Sql

Thanks

 

[Guest]

Leave the form DataEntry in false, but set the original RecordSource of the
form with a filter that return no records.

Select * From tblComputers WHERE AssetTag Is Null

That way no records will be displayed until you set the record sorce again
with your code

--
Good Luck
BS"D

Thanks, the routine works, but let say I place Data entry to yes, because I
dont want to se the first register in screen when I fill the text box with
the code and and click in the command button that have the code you show me,
the Select doesn't works, but if I move Data Entry to NO (It shows the first
register) work perfect.

Any Ideas how to fix this problem?

Thanks

Try

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice, tblComputers.Warranty,
tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE '" & [Forms]![frmComputers]![Text12]
& "*'"

Forms!frmComputers.RecordSource = Sql


--
Good Luck
BS"D

Hi, I want to build a Select sentence with a LIKE "PartOrACode*" option but I
dont know where to put the "*", the key field is txt and the sentence I have
is :

Sql = "SELECT tblComputers.AssetTag, tblComputers.ManufacturerID,
tblComputers.DateReceived, tblComputers.PurchasePrice, tblComputers.Warranty,
tblComputers.EmployeeID " & _
"FROM tblComputers WHERE AssetTag LIKE """ &
[Forms]![frmComputers]![Text12] & """"

Forms!frmComputers.RecordSource = Sql

Thanks