אוקי ניסיתי ככה ...
תסלח אבל אני חדש בתחום, ככה אני קורא את db באיזה שלב בדיוק אני צריך לשים את While loop כדי לשים ערך במערך. תודה.
sub Page_Load(sender As Object, E as EventArgs) If Not (Page.IsPostBack) dim dbconn As OleDbConnection dim sql As String dim dbcomm As OleDbCommand dim dbread As OleDbDataReader Dim dtf As New System.Globalization.DateTimeFormatInfo dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source=D:\webspace\disk20\db\news.mdb") dbconn.Open() sql="select top 7 * from ( SELECT TOP 7 [id], [date], [info], [title], [tag], [link], [from] FROM news ORDER BY id DESC) order by date desc" dbcomm=New OleDbCommand(sql,dbconn) dbread=dbcomm.ExecuteReader() news.DataSource=dbread news.DataBind() dbread.Close() dbconn.Close() End If end sub