Hej igen!
Jag har nu börjat med databaser och ska nu hämta information från en Access(2000) databas.
Men med min vanliga tur så fungerar det inte. :(
Jag får felmeddelandet
Compiler Error Message: BC30248: 'If', 'ElseIf', 'Else', 'End If', or 'Const' expected.
Source Error:
Line 26: <dib style="font:12px verdana;color:darkred">
Line 27: <i><b>
Line 28: <% # DataBinder.Eval(Container.DataItem,"Fnamn")%> <% # DataBinder.Eval(Container.DataItem,"Enamn")%>
Line 29: </i></b>
Line 30: </div>
Den röda raden är "problemraden".
<% @ Page Language="VB" %>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Data.OleDb" %>
<script runat="server">
Sub Page_Load(Obj As Object, E As Eventargs)
Dim Connection As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bank.mdb"))
Dim SQL As New OleDbDataAdapter("SELECT * FROM users", Connection)
Dim ds As DataSet = new DataSet()
SQL.Fill(ds, "users")
MyDataList.DataSource = ds.Tables("users").DefaultView
MyDataList.DataBind()
End Sub
</script>
<html>
<head>
<title>Hämta data med ASP.NET</title>
</head>
<body>
<asp:DataList id="MyDataList" RepeatColumns="2" RepeatDirection="Vertical" runat="server">
<ItemTemplate>
<div style="padding:15,15,15,15;font-size:11px;font-family:Verdana">
<dib style="font:12px verdana;color:darkred">
<i><b>
<% # DataBinder.Eval(Container.DataItem,"Fnamn")%> <% # DataBinder.Eval(Container.DataItem,"Enamn")%>
</i></b>
</div>
<br>
<b>Adress:</b> <% # DataBinder.Eval(Container.DataItem,"Adress")%><br>
<b>Postnummer:</b> <% # DataBinder.Eval(Container.DataItem,"Postnummer")%><br>
<b>Ort:</b> <% # DataBinder.Eval(Container.DataItem,"Ort")%><br>
<b>Telefon:</b> <% # DataBinder.Eval(Container.DataItem,"Telefon")%><br>
<b>Mobil:</b> <% # DataBinder.Eval(Container.DataItem,"Mobil")%><br>
</div>
</ItemTemplate>
</asp:DataList>
</body>
</html>
Allt som jag har skrivit står det exakt i boken. :l
Tacksam för svar!
/Mika3l