proper display

mateenmohd · June 17th, 2003, 06:32 AM

Hi all,

I want that If record not found in the table, it will display â - â sign on the page,
Some blank records are save in the table, in the blank field it will display (dask) sign
I am using following coding.

do while rs.eof=false
Response.Write("<tr>")
Response.Write("<td>" & rs("recordno") & "</td>")
Response.Write("<td>" & rs("description") & "</td>")
Response.Write("<td>" & rs("category") & "</td>")
Response.Write("<tr>")
rs.movenext
loop

best regards.

Mateen Martin
[email protected]

owain · June 17th, 2003, 06:46 AM

If the record does not exist then it will never be displayed. Your code is looping through the table one record at a time. It will never get to a record that does not exist.

If you are talking about Null or blank fields in the record then you will need to place the field into a variable and test whether it has a value or not. For example:

Code:

Dim fieldData

do while rs.eof=false 
Response.Write("<tr>")

fieldData = rs("recordno") & ""
If Len(fieldData) = 0 Then fieldData = " - "
Response.Write("<td>" & fieldData & "</td>")

fieldData = rs("description") & ""
If Len(fieldData) = 0 Then fieldData = " - "
Response.Write("<td>" & fieldData & "</td>")

fieldData = rs("category") & ""
If Len(fieldData) = 0 Then fieldData = " - "
Response.Write("<td>" & fieldData & "</td>")

Response.Write("<tr>")
rs.movenext
loop

Regards
Owain Williams

mateenmohd · June 18th, 2003, 01:25 AM

Dear Owain Williams

Thanks for your response.
it is solve my problem.
now page is display proper way.

best regards.

Mateen Martin

Quote:

quote:Originally posted by owain
If the record does not exist then it will never be displayed. Your code is looping through the table one record at a time. It will never get to a record that does not exist.

If you are talking about Null or blank fields in the record then you will need to place the field into a variable and test whether it has a value or not. For example:

Code:

Dim fieldData

do while rs.eof=false 
Response.Write("<tr>")

fieldData = rs("recordno") & ""
If Len(fieldData) = 0 Then fieldData = " - "
Response.Write("<td>" & fieldData & "</td>")

fieldData = rs("description") & ""
If Len(fieldData) = 0 Then fieldData = " - "
Response.Write("<td>" & fieldData & "</td>")

fieldData = rs("category") & ""
If Len(fieldData) = 0 Then fieldData = " - "
Response.Write("<td>" & fieldData & "</td>")

Response.Write("<tr>")
rs.movenext
loop

Regards
Owain Williams