Hi,
I have a problem of displaying/formating data bound by a datalist control. In my
table, I have fields like BusinessName and CustomerName... that based on different cratiria I
might display them or not like I show in example 1 and 2.
I would like to make my output to look like example 2a without blank lines in between rows...
Please help me.
Thanks in advance.
Example 1:
--------------
Req:25
BusinessName:ABC
CustomerName:David Green
Mobile #: 959-981-9779 Acct#: 4569994
Contact#: 949-191-4444 Alternate #: 994-454-2000
--------------------------
----------
----------
----
--------------------------
----------
----------
----
Example 2:
--------------
Req:26
? --- blank line
? --- blank line
Mobile #: 999-999-9999 Acct#: 4565451
Contact#: 999-191-5454 Alternate #: 994-454-1515
--------------------------
----------
----------
----
--------------------------
----------
----------
----
Example 2a:
--------------
Req:26
Mobile #: 999-999-9999 Acct#: 4565451
Contact#: 999-191-5454 Alternate #: 994-454-1515
....
Here is some html code:
<body>
<form id="form1" runat="server">
<div>
<asp:DataList ID="dlForm" runat="server" Height="80px" Width="488px">
<ItemTemplate>
<table border="0" width="579" height="1210">
<tr>
<td height="24" width="569" colspan="2">
<font face="Verdana" size="1" color="#3671b1">Request Number:</font><font face="Verdana" size="1"><%# DataBinder.Eval(Container.
DataItem, "ReqNo") %></font></td>
</tr>
<tr>
<td height="58" width="273">
<font face="Verdana" size="1"><!--Business Name:--><%#CheckForBusines
sName(Cont
ainer.Data
Item("Busi
nessName")
)%></font>
<p><font face="Verdana" size="1"><!--Customer Name:--><%#CheckForFName(C
ontainer.D
ataItem("F
Name"))%> <%#CheckForLName(Container
.DataItem(
"LName"))%
></font></
p>
<p><font face="Verdana" size="1"><!--Mobile #:--><%# MobileNotEqualRefund(Conta
iner.DataI
tem("Mobil
eNo"), Container.DataItem("Action
Required")
)%></font>
</p>
<p><font face="Verdana" size="1"><!--Contact #:--><%# DisplayContactNo(Container
.DataItem(
"ContactNo
"), Container.DataItem("Action
Required")
, Container.DataItem("Mobile
No"))%></f
ont></td>
<td height="58" width="290">
<p><font face="Verdana" size="1"><!--Acct #:--><%# AccountNotEqualRefund(Cont
ainer.Data
Item("Acco
untNo"), Container.DataItem("Action
Required")
)%></font>
</p>
<p><font face="Verdana" size="1"><!--Alternate #:--><%# DisplayAlternateNo(Contain
er.DataIte
m("Alterna
teNo"), Container.DataItem("Action
Required")
, Container.DataItem("Mobile
No"))%></f
ont></td>
</tr>
...
</table>
</ItemTemplate>
</asp:DataList>
</div>
</form>
</body>
--------------------------
----------
--
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
BindData()
End If
End Sub
Sub BindData()
Dim strConnString As String = "server=*******;database=*
*****;uid=
*****;pwd=
*****"
Dim objConn As New SqlConnection(strConnStrin
g)
Dim SQL1 As String
SQL1 = "select ......"
Dim cmd As New SqlCommand(SQL1, objConn)
Dim reader As SqlDataReader
objConn.Open()
reader = cmd.ExecuteReader
dlForm.DataSource = reader
dlForm.DataBind()
reader.Close()
objConn.Close()
End Sub
Public Function CheckForBusinessName(ByVal
BusinessName As String)
Select Case BusinessName
Case "Unknown"
Return ""
Case "None"
Return ""
Case "none"
Return ""
Case "n/a"
Return ""
Case Else
Return ("<font face='Verdana' size='1' color='#3671B1'>" & "Business Name: </font>" & BusinessName)
'Return BusinessName
End Select
End Function
Public Function CheckForFName(ByVal FName As String) As String
Select Case FName
Case "Unknown"
Return ""
Case "n/a"
Return ""
Case "999999999"
Return ""
Case Else
Return ("<font face='Verdana' size='1' color='#3671B1'>" & "Customer Name: </font>" & FName)
End Select
End Function
Public Function CheckForLName(ByVal LName As String) As String
Select Case LName
Case "Unknown"
Return ""
Case "n/a"
Return ""
Case "999999999"
Return ""
Case Else
Return LName
End Select
End Function
