Dr_Chaos,
Dette giver samme resultat. Jeg tror jeg definere variablen forkert.
Kan bare ikke lige helt se mig ud af hvordan.
Jeg vedhæfter lige hele koden.
Default.aspx:
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "
http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="
http://www.w3.org/1999/xhtml" >
<head runat="server">
<link rel="stylesheet" type="text/css" href="style.css" title="Default" />
<title>smiszek.dk</title>
</head>
<body>
<form id="form1" runat="server">
<asp:SqlDataSource runat="server" ID="SqlDataSource1" ConnectionString="<%$ ConnectionStrings:smiszek.dkConnectionString %>" SelectCommand="SELECT * FROM dbo.CV"/>
<asp:SqlDataSource runat="server" ID="SqlDataSource2" ConnectionString="<%$ ConnectionStrings:smiszek.dkConnectionString %>" SelectCommand="SELECT * FROM CV WHERE id=@side"/>
<div>
<div id="top_yellow">
<div id="headline">
<img src="
http://smiszek.dk/images/gfx_images/shared/smiszek_dk.gif" />
</div>
</div>
<div id="container">
<div id="picture_yellow">
</div>
<div id="submenu_yellow">
<div class="submenuframe_yellow">
<div class="submenuframehead_yellow"><h2>Menu:</h2></div>
<div class="submenuframebody_yellow">
<ul>
<asp:Repeater ID="Repeater1" runat="server" DataSourceID="SqlDataSource1">
<ItemTemplate>
<li><a href="Default.aspx?side=<%# eval("Id") %>"><%#Eval("Overskrift")%></a></li>
</ItemTemplate>
</asp:Repeater>
</ul>
</div>
</div>
</div>
<div id="indhold_yellow">
<asp:DataList ID="DataList1" runat="server" DataSourceID="SqlDataSource2">
<ItemTemplate>
<%#Eval("Overskrift")%>
</ItemTemplate>
</asp:DataList>
</div>
</div>
<div id="bund">
<p>Hostet and powered by <a href="
http://spooze.smiszek.dk">spooze.smiszek.dk</a> | Uptime: <? echo $uptime; ?> | Copyright © 2006 Mikkel Smiszek</p>
</div>
</div>
</form>
</body>
</html>
default.aspx.vb:
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
Dim side As Decimal = Request("side")
SqlDataSource2.SelectCommand = "SELECT * FROM CV WHERE id=@side"
End Sub
End Class
