sSQL = "SELECT DISTINCT [Serial No] FROM tblYourTable WHERE [City] = '" & sString & "' AND [Print] = 0"

When i run this in query design the serial no is returning blank.Thats why i asked you whether the code i inserted is wrong.But the code above is what has been given by you.

try replacing 0 with "No" as in your other SQL strings.

mmcdonal

Look it up at: http://wrox.books24x7.com

I tried it,same result only...

Please send me a copy of the database and I will work on it.

mmcdonal

Look it up at: http://wrox.books24x7.com

How do i send the database?

Click on my name, and then click to email user...

mmcdonal

Look it up at: http://wrox.books24x7.com

If IsNull(Me.CityList.Value) Or Me.CityList.Value = "" Then
    [Forms]![frmYourForm].[SerialNoList].RowSource = ""
    Exit Sub
    Else
    sString = Me.CityList.Value
End If


The variable sString does not have any value when I select it in the city listbox as i inserted the command
MSGBOX sString
before the Exit Sub.

Hence, the query is also returning no records.

Also, am unable to attach the database in the email-to option after clicking your name.

Can you help please...

Email me and send me your email address, and I will reply to it, and you will get my email address.

mmcdonal

Look it up at: http://wrox.books24x7.com