就是后台读数据集 后台代码 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim add As String Dim image As String Dim dtr As SqlDataReader Dim idd = Convert.ToString(Request.QueryString("BigClassName")) Dim page = Convert.ToString(Request.QueryString("page")) Dim ds As DataSet = New DataSet Dim myconn As SqlConnection = New SqlConnection(ConfigurationSettings.AppSettings("connectionString")) Dim adapter As SqlDataAdapter = New SqlDataAdapter("Select companyyx from CompanyContent where MlbigClassName='" & idd & "' and shenhe=0 order by times Desc", myconn) adapter.Fill(ds, "Orders") Dim pp As New PagedDataSource pp.DataSource = ds.Tables("Orders").DefaultView pp.AllowPaging = True pp.PageSize = 50 Dim nPageCount As Integer '保存总共的数据页面数目 Dim a = ds.Tables("Orders").Rows.Count '保存记录总数 Dim nPage As Integer '存放要浏览当前数据页面号 If pp.PageCount Mod pp.PageSize > 0 Then nPageCount = a \ pp.PageSize nPageCount += 1 End If nPage = Convert.ToInt32(Request.QueryString("Page")) If Request.QueryString("Page") < 1 Then nPage = 1 End If If Request.QueryString("Page") > nPageCount Then nPage = nPageCount End If pp.CurrentPageIndex = nPage - 1 'lblPageCount.Text = "总共" & a.ToString() + "条纪录" page = (" " & "页次:" & nPage.ToString() & "/" & nPageCount.ToString()) page += (" <A HREF = """ & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & (1).ToString() & """>首 页 </A >") ' If Not pp.IsFirstPage Then page += (" <A HREF = """ & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & Convert.ToString(nPage - 1) & """ >上一页</A > ") ' End If ' If Not pp.IsLastPage Then page += ("<A HREF =""" & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & Convert.ToString(nPage + 1) & """ >下一页</A > ") ' End If page += ("<A HREF = """ & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & (nPageCount).ToString() & """ >尾 页</A >") dstmsg.DataSource = pp dstmsg.DataBind() End Sub前台代码 <asp:datalist id="dstmsg" runat="server" BorderStyle="None" BorderColor="ActiveBorder"> <itemtemplate> <img url=" <%# DataBinder.Eval(Container.DataItem,companyyx' ).ToString()==''?'11.gif:'22.gif' %> "/> </itemtemplate> </asp:datalist>
<img url='<%# (DataBinder.Eval(Container.DataItem,"user_id" ).ToString() == "")?"11.gif":"22.gif" %> '/>
有值 显示22.gif
双引号还是单引号?不是太确定!
这样的结构
如果第一个真返回true否则执行第二个如果是真返回true否则返回false
后台代码
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim add As String
Dim image As String
Dim dtr As SqlDataReader
Dim idd = Convert.ToString(Request.QueryString("BigClassName"))
Dim page = Convert.ToString(Request.QueryString("page"))
Dim ds As DataSet = New DataSet
Dim myconn As SqlConnection = New SqlConnection(ConfigurationSettings.AppSettings("connectionString"))
Dim adapter As SqlDataAdapter = New SqlDataAdapter("Select companyyx from CompanyContent where MlbigClassName='" & idd & "' and shenhe=0 order by times Desc", myconn)
adapter.Fill(ds, "Orders")
Dim pp As New PagedDataSource
pp.DataSource = ds.Tables("Orders").DefaultView
pp.AllowPaging = True
pp.PageSize = 50
Dim nPageCount As Integer '保存总共的数据页面数目
Dim a = ds.Tables("Orders").Rows.Count '保存记录总数
Dim nPage As Integer '存放要浏览当前数据页面号
If pp.PageCount Mod pp.PageSize > 0 Then
nPageCount = a \ pp.PageSize
nPageCount += 1
End If
nPage = Convert.ToInt32(Request.QueryString("Page"))
If Request.QueryString("Page") < 1 Then
nPage = 1
End If
If Request.QueryString("Page") > nPageCount Then
nPage = nPageCount
End If
pp.CurrentPageIndex = nPage - 1
'lblPageCount.Text = "总共" & a.ToString() + "条纪录"
page = (" " & "页次:" & nPage.ToString() & "/" & nPageCount.ToString())
page += (" <A HREF = """ & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & (1).ToString() & """>首 页 </A >")
' If Not pp.IsFirstPage Then
page += (" <A HREF = """ & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & Convert.ToString(nPage - 1) & """ >上一页</A > ")
' End If
' If Not pp.IsLastPage Then
page += ("<A HREF =""" & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & Convert.ToString(nPage + 1) & """ >下一页</A > ")
' End If
page += ("<A HREF = """ & Request.CurrentExecutionFilePath & "?BigClassName=" & idd & "&page=" & (nPageCount).ToString() & """ >尾 页</A >") dstmsg.DataSource = pp
dstmsg.DataBind() End Sub前台代码
<asp:datalist id="dstmsg" runat="server" BorderStyle="None" BorderColor="ActiveBorder">
<itemtemplate>
<img url=" <%# DataBinder.Eval(Container.DataItem,companyyx' ).ToString()==''?'11.gif:'22.gif' %> "/>
</itemtemplate>
</asp:datalist>
这个就行
<asp:Image runat=server ImageUrl = '<%#Eval("user_id ")== "" ? "11.jpg":"12.jpg" %>' ></asp:Image>
<img url=" <%# DataBinder.Eval(Container.DataItem,"user_id").ToString()==""?"11.gif":"22.gif"%>"/>
<img url= ' <%# Eval("user_id " ).ToString()==""? "11.gif ": "22.gif " %> '/>