Nu har jag prövat d mesta men utan resultat vänder jag nu mig till er här...
<%@ Page Language="VB" %>
<%@ Import Namespace="System.data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server">
Sub Page_Load(sender as object, e as eventargs)
If Not Page.IsPostBack Then
BindGrid
End If
End Sub
Sub BindGrid
Dim objForum as new Guardian.Show
Dim objReader = objForum.VisaAllt
dlItems.DataSource = objReader
dlItems.Databind()
objReader.Close
End Sub
Sub Changed(obj as Object, e as DataGridPageChangedeventargs)
dlItems.CurrentPageIndex = e.NewPageIndex
dlItems.Databind()
End Sub
</script>
<html><body>
<form runat="server">
<asp:DataGrid id="dlItems" runat="server"
BorderColor="black"
GridLines="vertical"
Cellpadding="4"
Cellspacing="0"
Width="450"
Font-Names="Arial"
Font-Size="8pt"
ShowFooter="true"
HeaderStyle-BackColor="#cccc99"
FooterStyle-BackColor="#cccc99"
ItemStyle-BackColor="#ffffff"
AlternatingItemStyle-BackColor="#cccccc"
AutoGenerateColumns="False"
AllowCustomPaging="true"
PageSize=1
PagerStyle-Mode = NumericPages
PagerStyle-PageButtonCount = 2
OnPageIndexChanged="Changed">
<Columns>
<asp:TemplateColumn HeaderText="Avsändare">
<ItemTemplate>
<asp:Label id="Avsändare" runat="server" Text='<%# Container.DataItem("Author") %>' />
</ItemTemplate>
</asp:TemplateColumn>
<asp:BoundColumn HeaderText="Meddelande" DataField="Message" />
<asp:BoundColumn HeaderText="Tid" DataField="Date" />
</Columns>
</asp:DataGrid>
</form>
</body></html>
Alla tips mottages gärna, även förslag på optimering...
tack på förhand