Avatar billede bjorn_jeppesen Nybegynder
27. september 2007 - 13:43 Der er 17 kommentarer

Gridview rowcommand giver "Cast is invalid"

Halløj,
Jeg har en side med et gridview der indeholder 2 knapper som vist i eksemplet: http://www.codeproject.com/aspnet/DoubleClickGridviewRow.asp?print=true

Hvis jeg ønsker at ændre en session variable i forbindelse med Click eller doubleclick, kommer der en fejlmeddelelse.

Jeg har siden liggende som en del af en masterpage og i et AJAX updatepanel.

Jeg har en fornemmelse af at jeg mangler noget prerender, men kan ikke finde ind til problemet.
Please hjælp!
Avatar billede neoman Novice
27. september 2007 - 19:31 #1
kan du vise koden i den handler som genererer fejlmeddelelsen  ?
Avatar billede neoman Novice
27. september 2007 - 19:55 #2
og det ville også hjælpe at vide hvad det er som nægter at blive castet:)
Avatar billede neoman Novice
27. september 2007 - 20:05 #3
for ellers er svaret "42"
Avatar billede bjorn_jeppesen Nybegynder
27. september 2007 - 20:53 #4
Jeg formoder at det er override sub render der ikke er med på hvilken konrtol der ertale om efter en postback. Men hvordan Hur? får man den til at vide det.

Som sagt kører den fint ved at lægge tekst til i boksen message.

'Protected Overrides Sub Render(ByVal writer As HtmlTextWriter)    '    For Each r As GridViewRow In GridView1.Rows
    '        If (r.RowType = DataControlRowType.DataRow) Then
    '            Dim cellIndex As Integer = 10
    '            Do While (cellIndex < r.Cells.Count)
    '                Page.ClientScript.RegisterForEventValidation((r.UniqueID + "$ctl10"), cellIndex.ToString)
    '                Page.ClientScript.RegisterForEventValidation((r.UniqueID + "$ctl11"), cellIndex.ToString)
    '                cellIndex = (cellIndex + 1)
    '            Loop
    '        End If
    '    Next
       
    '    MyBase.Render(writer)

  Dim cellIndex As Integer = 0
                Do While (cellIndex < e.Row.Cells.Count)
                    ' Get the LinkButton control in the first cell
                    Dim _singleClickButton As LinkButton = CType(e.Row.Cells(10).Controls(0), LinkButton)
                    ' Get the javascript which is assigned to this LinkButton
                    Dim _jsSingle As String = ClientScript.GetPostBackClientHyperlink(_singleClickButton, "")
                    ' Add the cell index as the event argument parameter
                    _jsSingle = _jsSingle.Insert((_jsSingle.Length - 2), cellIndex.ToString)
                    ' To prevent the first click from posting back immediately
                    ' (therefore giving the user a chance to double click) pause the
                    ' postback for 300 milliseconds by using setTimeout
                    _jsSingle = _jsSingle.Insert(11, "setTimeout(""")
                    _jsSingle = (_jsSingle + """, 300)")
                    ' Add this javascript to the onclick Attribute of the row
                    e.Row.Cells(cellIndex).Attributes("onclick") = _jsSingle
                    ' Get the LinkButton control in the second cell
                    Dim _doubleClickButton As LinkButton = CType(e.Row.Cells(11).Controls(0), LinkButton)
                    ' Get the javascript which is assigned to this LinkButton
                    Dim _jsDouble As String = ClientScript.GetPostBackClientHyperlink(_doubleClickButton, "")
                    ' Add the cell index as the event argument parameter
                    _jsDouble = _jsDouble.Insert((_jsDouble.Length - 2), cellIndex.ToString)
                    ' Add this javascript to the ondblclick Attribute of the row
                    e.Row.Cells(cellIndex).Attributes("ondblclick") = _jsDouble
                    cellIndex = (cellIndex + 1)
                Loop

Protected Sub GridView1_RowCommand(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCommandEventArgs)
        Dim _gridView As GridView = CType(sender, GridView)
        _gridView.EditIndex = -1
        ' Get the selected index and the command name
        Dim _selectedIndex As Integer = Integer.Parse(e.CommandArgument.ToString)
        Dim _commandName As String = e.CommandName
        Dim _eventArgument As String = Request.Form("__EVENTARGUMENT")
        Dim vSelectedUID
       
        vSelectedUID = CType(GridView1.Rows(_selectedIndex).Cells(9).Controls(1), Label).Text
       
        Select Case (_commandName)
            Case "SingleClick"
                _gridView.SelectedIndex = _selectedIndex
                Me.GridView1.DataBind()
                'Me.Message.Text = (Me.Message.Text + ("rowindex(" _
                '            + (_selectedIndex.ToString + (") cellindex(" _
                '            + (_eventArgument + ") - SUID(" + vSelectedUID + ")<br />")))))
                Session("selectedUID") = vSelectedUID
               
            Case "DoubleClick"
                _gridView.EditIndex = _selectedIndex
                _gridView.SelectedIndex = -1
                Me.GridView1.DataBind()
                'Me.Message.Text = (Me.Message.Text + ("rowindex(" _
                '+ (_selectedIndex.ToString + (") cellindex(" _
                '+ (_eventArgument + ") - SUID(" + vSelectedUID + ")<br />")))))
                Session("selectedUID") = vSelectedUID
               
        End Select
        'Response.Redirect("Schedule.aspx")
    End Sub
Avatar billede neoman Novice
27. september 2007 - 21:13 #5
Nu har du stadig ikke svaret  på hvad det er der ikke vil kastes.

Jeg bemærker en forskel mellem din kode og eksemplet. ctl10 & ctl11 hos dig mens eksemplet viser ct100 og ct101. Er den ændring også i resten af din kode ? Du kan kigge i sourcen på klienten for at se hvad de forskellige ting hedder og om det hænger sammen.
Avatar billede neoman Novice
27. september 2007 - 21:33 #6
Kan være den ikke kan finde dit gridview fordi det ligger i en updatepanel


        vSelectedUID = CType(GridView1.Rows(_selectedIndex).Cells(9).Controls(1), Label).Text
->
vSelectedUID = CType(_gridView.Rows(_selectedIndex).Cells(9).Controls(1), Label).Text

          Me.GridView1.DataBind()
->
          _gridView.DataBind()
Avatar billede bjorn_jeppesen Nybegynder
27. september 2007 - 21:38 #7
Og hvad gør den render dims så?
Hvorfor er det anderledes at høvle en postback afsted end at skrive i en teksbox i et script?
Skal alle de kontroller der er angivet i gridviewet have detunikke id påført?

Tak for at se ind til det.
Avatar billede bjorn_jeppesen Nybegynder
27. september 2007 - 21:40 #8
oh ajax - Men hvis jeg læser vSelectedUID med i tekstboxen kører det super.
Avatar billede neoman Novice
27. september 2007 - 21:44 #9
Hvis du ikke vil svare på spørgsmål, så bliver dette her altså for svært for mig. Hvilken linje er det der giver fejlen, hvad er teksten i fejlmeddelelsen, og er det den viste kode (med alle de udkommenterede ting) som du kører ?
Avatar billede bjorn_jeppesen Nybegynder
27. september 2007 - 22:36 #10
Oh du har ret. det er ikke fair. Jeg har ingen linieangivelse. Men der er mere end 700 linier i codebehind.
Jeg laver en ny side imorgen, der giver samme scenarie.
Avatar billede bjorn_jeppesen Nybegynder
28. september 2007 - 02:45 #11
UPS - I kildekoden til den genererede side, er der angivet følgende udfor click kontrollerne.
ctl00$ContentPlaceHolder1$GridView1

Så det er måske derfor den aldrig finder noget på ctl10?

Skal det mon så være:
ctl00$ContentPlaceHolder1$GridView1

Her er den fulde kode for siden........:

<%@ Page Language="VB" MasterPageFile="~/MasterPage_Wide.master" Title="...::: Concept 10 10 - Dagens reservationer :::..."  %>
<%@ Import Namespace="System.Drawing" %>

<script runat="server">
    Protected Overrides Sub Render(ByVal writer As HtmlTextWriter)
        ' The client scripts for GridView1 were created in GridView1_RowDataBound
        For Each r As GridViewRow In GridView1.Rows
            If (r.RowType = DataControlRowType.DataRow) Then
                Dim cellIndex As Integer = 2
                Do While (cellIndex < r.Cells.Count)
                    Page.ClientScript.RegisterForEventValidation((r.UniqueID + "$ctl10"), cellIndex.ToString)
                    Page.ClientScript.RegisterForEventValidation((r.UniqueID + "$ctl11"), cellIndex.ToString)
                    cellIndex = (cellIndex + 1)
                Loop
            End If
        Next
     
        MyBase.Render(writer)
    End Sub
   
    Protected Sub ImageButton6_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs)
    End Sub
   
    Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
        SqlDataSource1.UpdateCommand = "UPDATE tbl_Reservations SET Reservation_lnkUser = NULL, Reservation_Subject = NULL WHERE (Reservation_RegID = @Reservation_RegID)"
        SqlDataSource1.Update()
        Me.setButton()
    End Sub
   
    Protected Sub GridView2_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
        SqlDataSource2.UpdateCommand = "UPDATE tbl_Reservations SET Reservation_lnkUser = NULL, Reservation_Subject = NULL WHERE (Reservation_RegID = @Reservation_RegID)"
        SqlDataSource2.Update()
        Me.setButton()
    End Sub

    Protected Sub setButton()
        Dim vTA1 As New DataSet1TableAdapters.tbl_OrdersTableAdapter()
        Dim vTA2 As New DataSet1TableAdapters.tbl_ReservationsTableAdapter()
        Dim vCountOrder As Double
        Dim vCountReservations As Double
        If Not Session("SelectedUID") = Nothing Then
            vCountOrder = CType(vTA1.sq_CountMemberOrders(Session("SelectedUID")), Double)
            vCountReservations = CType(vTA2.sq_CountMemberReservations(Session("SelectedUID")), Double)
        End If
        If vCountReservations = 0 Then
            Reservestatus.Text = "Første gang der bestilles en tid bookes en time, vælg venligst en tid."
            If GridView1.Controls(0).FindControl("ReservateTrack1") IsNot Nothing Then
                GridView1.Controls(0).FindControl("ReservateTrack1").Visible = False
            End If
        Else
            Reservestatus.Text = ""
            If GridView1.Controls(0).FindControl("ReservateTrack1") IsNot Nothing Then
                GridView1.Controls(0).FindControl("ReservateTrack1").Visible = True
            End If
        End If
               
        Me.Label4.Text = (vCountOrder - vCountReservations).ToString
    End Sub


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
       
        'If Request.Browser.Platform = "WinCE" Then Response.Redirect("~/1_DK/App_Pages_EmployeeMobile/Schedule.aspx")
       
        If Session("CurrentUser") = Nothing Then
            Session("CurrentUser") = Membership.GetUser().UserName
            Dim vTBA As New DataSet1TableAdapters.tbl_UserTableAdapter
            Session("CurrentUID") = vTBA.SQ_FindUserRegid(Session("CurrentUser"))
            Dim vTA1 As New DataSet1TableAdapters.tbl_UserTableAdapter()
            Session("CurrentUserConcern") = CType(vTA1.sq_FindUserConcern(Session("CurrentUID")), Double)
        End If
        If Not Session("SelectedDate") = Nothing Then
            Calendar1.SelectedDate = Session("SelectedDate")
            Me.Label5.Text = "Reservationer for " & String.Format("{0:D}", Calendar1.SelectedDate)
        End If
       
        If Not IsPostBack Then
            If Calendar1.SelectedDate < "01-01-1980" Then
                Calendar1.SelectedDate = DateValue(Now())
                Calendar1.DataBind()
                Session("SelectedDate") = Calendar1.SelectedDate
                Me.Label5.Text = "Reservationer for " & String.Format("{0:D}", Calendar1.SelectedDate)
            End If
        Else
        End If
       
        If Session("SelectedCenter") = Nothing Then
            Dim vTA1 As New DataSet1TableAdapters.tbl_UserTableAdapter()
            Dim vSelectedCenter As String
            vSelectedCenter = vTA1.sq_FindPreferredCenter(Membership.GetUser().UserName).ToString
            Session("SelectedCenter") = vSelectedCenter
        End If
        Me.setButton()
    End Sub

    Protected Sub track1(ByVal sender As Object, ByVal e As System.EventArgs)
        'BJJ: Udkommenteret indtil der er ajourført træningskort
        'If CInt(Me.Label4.Text) = 0 Then
        '    If GridView1.Columns.Item(0) IsNot Nothing Then
        '        GridView1.Columns.Item(0).Visible = False
        '    End If
        'Else
        If GridView1.Columns.Item(0) IsNot Nothing Then
            GridView1.Columns.Item(0).Visible = True
        End If
        'end if
    End Sub
   
    Protected Sub track2(ByVal sender As Object, ByVal e As System.EventArgs)
        'BJJ: Udkommenteret indtil der er ajourført træningskort
        'If CInt(Me.Label4.Text) = 0 Then
        '    If GridView2.Columns.Item(0) IsNot Nothing Then
        '        GridView2.Columns.Item(0).Visible = False
        '    End If
                   
        'Else
        If GridView2.Columns.Item(0) IsNot Nothing Then
            GridView2.Columns.Item(0).Visible = True
        End If
        'End If
    End Sub

    Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs)
        'Setting the session("SelectedUID") to Reservation_lnkUser
        'If GridView1.Rows(e.RowIndex).Cells(9).Text Then
        'Session("SelectedUID") = GridView1.Rows(e.RowIndex).Cells(9).Text.ToString
        'End If
        'End setting

        If (Session("FirstTime") = "true") Then
            Dim ReservationStart1 As DateTime = GridView1.Rows(e.RowIndex).Cells(1).Text
            Dim Currenttime1 As DateTime = Today()
            ReservationStart1 = Calendar1.SelectedDate + " " + ReservationStart1
            ReservationStart1 = ReservationStart1.AddMinutes(30)
            Session("xtraDate") = ReservationStart1
            Session("track") = 1
            Dim dssa As DataSourceSelectArguments = New DataSourceSelectArguments()
            Dim dv As Data.DataView = CType(SDS_Xtra.Select(dssa), Data.DataView)
            Dim u As Integer
            Dim i As Integer
            If dv.Count > 0 Then
                If dv.Table.Rows(0).Item("Reservation_lnkUser").GetType.ToString <> "System.DBNull" Then
                    u = CType(dv.Table.Rows(0).Item("Reservation_lnkUser"), Integer)
                End If
                i = CType(dv.Table.Rows(0).Item("Reservation_RegID"), Integer)
            Else
                e.Cancel = True
                Reservestatus.Text = "Første gang der bestilles en tid skal der bookes en time, men den næste tid er ikke ledig, vælg venligst en anden tid."
                Return
            End If
            If u Then
                If u = 0 Then
                    Session("userid") = Session("User_RegID")
                    Session("regid") = i
                    SDS_Xtra.Update()
                    e.Cancel = False
                    Return
                Else
                    e.Cancel = True
                    Reservestatus.Text = "Første gang der bestilles en tid skal der bookes en time, men den næste tid er ikke ledig, vælg venligst en anden tid."
                    Return
                End If
            Else
                Session("userid") = Session("User_RegID")
                Session("regid") = i
                SDS_Xtra.Update()
                e.Cancel = False
                Return
            End If
        End If
        Dim ReservationStart As DateTime = GridView1.Rows(e.RowIndex).Cells(1).Text
        Dim Currenttime As DateTime = Today()
        If Currenttime.CompareTo(Calendar1.SelectedDate) > 0 Then
            e.Cancel = True
            Reservestatus.Text = "Kan ikke reserveres, da datoen for træningsgangen er passeret."
            Return
        End If
        ReservationStart = Calendar1.SelectedDate + " " + ReservationStart
        Currenttime = Now()
        Dim TimeToEvent As Int32 = DateDiff(DateInterval.Minute, Currenttime, ReservationStart)
        Select Case TimeToEvent
            Case Is < 0
                e.Cancel = True
                Reservestatus.Text = "Kan ikke reserveres, da starttidspunktet for træningsgangen er passeret."
            Case Is > 0
                e.Cancel = False
                Reservestatus.Text = "Træningsgang den " & DateValue(ReservationStart) & " er bestilt"
        End Select
       

       
    End Sub

    Protected Sub GridView2_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs)
        If (Session("FirstTime") = "true") Then
            Dim ReservationStart1 As DateTime = GridView2.Rows(e.RowIndex).Cells(1).Text
            Dim Currenttime1 As DateTime = Today()
            ReservationStart1 = Calendar1.SelectedDate + " " + ReservationStart1
            ReservationStart1 = ReservationStart1.AddMinutes(30)
            Session("xtraDate") = ReservationStart1
            Session("track") = 2
            Dim dssa As DataSourceSelectArguments = New DataSourceSelectArguments()
            Dim dv As Data.DataView = CType(SDS_Xtra.Select(dssa), Data.DataView)
            Dim u As Integer
            Dim i As Integer
            If dv.Count > 0 Then
                If dv.Table.Rows(0).Item("Reservation_lnkUser").GetType.ToString <> "System.DBNull" Then
                    u = CType(dv.Table.Rows(0).Item("Reservation_lnkUser"), Integer)
                End If
                i = CType(dv.Table.Rows(0).Item("Reservation_RegID"), Integer)
            Else
                e.Cancel = True
                Reservestatus.Text = "Første gang der bestilles en tid skal der bookes en time, men den næste tid er ikke ledig, vælg venligst en anden tid."
                Return
            End If
            If u Then
                If u = 0 Then
                    Session("userid") = Session("User_RegID")
                    Session("regid") = i
                    SDS_Xtra.Update()
                    e.Cancel = False
                    Return
                Else
                    e.Cancel = True
                    Reservestatus.Text = "Første gang der bestilles en tid skal der bookes en time, men den næste tid er ikke ledig, vælg venligst en anden tid."
                    Return
                End If
            Else
                Session("userid") = Session("User_RegID")
                Session("regid") = i
                SDS_Xtra.Update()
                e.Cancel = False
                Return
            End If
        End If
        Dim ReservationStart As DateTime = GridView2.Rows(e.RowIndex).Cells(1).Text
        Dim Currenttime As DateTime = Today()
        If Currenttime.CompareTo(Calendar1.SelectedDate) > 0 Then
            e.Cancel = True
            Reservestatus.Text = "Kan ikke reserveres, da datoen for træningsgangen er passeret."
            Return
        End If
        ReservationStart = Calendar1.SelectedDate + " " + ReservationStart
        Currenttime = Now()
        Dim TimeToEvent As Int32 = DateDiff(DateInterval.Minute, Currenttime, ReservationStart)
        Select Case TimeToEvent
            Case Is < 0
                e.Cancel = True
                Reservestatus.Text = "Kan ikke reserveres, da starttidspunktet for træningsgangen er passeret."
            Case Is > 0
                e.Cancel = False
                Reservestatus.Text = "Træningsgang den " & DateValue(ReservationStart) & " er bestilt"
        End Select
    End Sub



    Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs)
        Me.setButton()
        Session("SelectedDate") = Calendar1.SelectedDate
        GridView1.DataBind()
        GridView2.DataBind()
        Me.Label5.Text = "Reservationer for den " & String.Format("{0:D}", Me.Calendar1.SelectedDate)
    End Sub



    Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Response.Redirect("editmember.aspx?UID=" & Session("selectedUID"))
    End Sub

    Protected Sub btn_Session_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Response.Redirect("Sessions.aspx?RID=25581" & GridView1.SelectedValue)
    End Sub

    Protected Sub LinkButton4_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Session("ANNULLERET") = Me.GridView1.SelectedValue
        Response.Write(Session("ANNULLERET"))
       
    End Sub
   
   
    Protected Sub GridView1_RowUpdated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdatedEventArgs)
        Me.setButton()
    End Sub

    Protected Sub GridView2_RowUpdated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdatedEventArgs)
        Me.setButton()
    End Sub

    Protected Sub GridView1_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GridView1.RowDataBound
        If e.Row.RowType = DataControlRowType.DataRow Then
            e.Row.Attributes("onmouseover") = "java script:setMouseOverColor(this);"
            e.Row.Attributes("onmouseout") = "java script:setMouseOutColor(this);"
            Dim db As ImageButton = CType(e.Row.Cells(0).Controls(1), ImageButton)
            Dim db1 As ImageButton = CType(e.Row.Cells(5).Controls(1), ImageButton)
            Dim db2 As ImageButton = CType(e.Row.Cells(6).Controls(1), ImageButton)
            Dim db3 As ImageButton = CType(e.Row.Cells(8).Controls(1), ImageButton)
            Dim MembernameCtrl As Label = CType(e.Row.Cells(4).Controls(1), Label)
            Dim ReservationMemoCtrl As Label = CType(e.Row.Cells(3).Controls(1), Label)
            Dim ReservationIDCtrl As Label = CType(e.Row.Cells(7).Controls(1), Label)
            Dim MemberName = MembernameCtrl.Text.ToString
            Dim ReservationMemo = ReservationMemoCtrl.Text.ToString
            Dim ReservationID = ReservationIDCtrl.Text.ToString
           
            If MemberName = "" Then
                db.Visible = True
                db1.Visible = False
                db2.Visible = False
                db3.Visible = False
            Else
                db.Visible = False
                db1.Visible = True
                db2.PostBackUrl = "Reservation.aspx?RID=" & ReservationID
                If Not ReservationMemo = "" Then
                   
                    'db2.ToolTip = ReservationMemo
                    e.Row.ToolTip = ReservationMemo
                    db2.Visible = True
                Else
                    db3.PostBackUrl = "Reservation.aspx?RID=" & ReservationID
                    db3.ToolTip = "Opret notat for træning af " & MemberName.ToString & "....."
                    db3.Visible = True
                End If
                db.OnClientClick = "return confirm('Tiden er reserveret til " & MemberName.ToString & ". Er du sikker på at du vil ændre på reservationen?');"
                db1.OnClientClick = "return confirm('Tiden er reserveret til " & MemberName.ToString & ". Er du sikker på at du vil annullere reservationen?');"
               
                '----Funktion til fastholdelse af medlemsnummer
                'Dim cellIndex As Integer = 2
                'Do While (cellIndex < e.Row.Cells.Count)
                '    ' Get the LinkButton control in the first cell
                '    Dim _singleClickButton As LinkButton = CType(e.Row.Cells(10).Controls(0), LinkButton)
                '    ' Get the javascript which is assigned to this LinkButton
                '    Dim _jsSingle As String = ClientScript.GetPostBackClientHyperlink(_singleClickButton, "")
                '    ' Add the cell index as the event argument parameter
                '    _jsSingle = _jsSingle.Insert((_jsSingle.Length - 2), cellIndex.ToString)
                '    ' To prevent the first click from posting back immediately
                '    ' (therefore giving the user a chance to double click) pause the
                '    ' postback for 300 milliseconds by using setTimeout
                '    _jsSingle = _jsSingle.Insert(11, "setTimeout(""")
                '    _jsSingle = (_jsSingle + """, 300)")
                '    ' Add this javascript to the onclick Attribute of the row
                '    e.Row.Cells(cellIndex).Attributes("onclick") = _jsSingle
                '    ' Get the LinkButton control in the second cell
                '    Dim _doubleClickButton As LinkButton = CType(e.Row.Cells(11).Controls(0), LinkButton)
                '    ' Get the javascript which is assigned to this LinkButton
                '    Dim _jsDouble As String = ClientScript.GetPostBackClientHyperlink(_doubleClickButton, "")
                '    ' Add the cell index as the event argument parameter
                '    _jsDouble = _jsDouble.Insert((_jsDouble.Length - 2), cellIndex.ToString)
                '    ' Add this javascript to the ondblclick Attribute of the row
                '    e.Row.Cells(cellIndex).Attributes("ondblclick") = _jsDouble
                '    cellIndex = (cellIndex + 1)
                'Loop
                '----END
               
            End If
        End If
    End Sub

    Protected Sub GridView2_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs)
        If e.Row.RowType = DataControlRowType.DataRow Then
            e.Row.Attributes("onmouseover") = "java script:setMouseOverColor(this);"
            e.Row.Attributes("onmouseout") = "java script:setMouseOutColor(this);"
            Dim db As ImageButton = CType(e.Row.Cells(0).Controls(1), ImageButton)
            Dim db1 As ImageButton = CType(e.Row.Cells(5).Controls(1), ImageButton)
            Dim db2 As ImageButton = CType(e.Row.Cells(6).Controls(1), ImageButton)
            Dim db3 As ImageButton = CType(e.Row.Cells(8).Controls(1), ImageButton)
            Dim ReservationMemoCtrl As Label = CType(e.Row.Cells(3).Controls(1), Label)
            Dim MembernameCtrl As Label = CType(e.Row.Cells(4).Controls(1), Label)
            Dim ReservationIDCtrl As Label = CType(e.Row.Cells(7).Controls(1), Label)
            Dim MemberName = MembernameCtrl.Text.ToString
            Dim ReservationMemo = ReservationMemoCtrl.Text.ToString
            Dim ReservationID = ReservationIDCtrl.Text.ToString
           
            If MemberName = "" Then
                db.Visible = True
                db1.Visible = False
                db2.Visible = False
                db3.Visible = False
            Else
                db.Visible = False
                db1.Visible = True
                db2.PostBackUrl = "Reservation.aspx?RID=" & ReservationID
                If Not ReservationMemo = "" Then
                    db3.PostBackUrl = "Reservation.aspx?RID=" & ReservationID
                    'db2.ToolTip = ReservationMemo
                    e.Row.ToolTip = ReservationMemo
                    db2.Visible = True
                Else
                    db3.PostBackUrl = "Reservation.aspx?RID=" & ReservationID
                    db3.ToolTip = "Opret notat for træning af " & MemberName.ToString & "....."
                    db3.Visible = True
                End If
                db.OnClientClick = "return confirm('Tiden er reserveret til " & MemberName.ToString & ". Er du sikker på at du vil ændre på reservationen?');"
                db1.OnClientClick = "return confirm('Tiden er reserveret til " & MemberName.ToString & ". Er du sikker på at du vil annullere reservationen?');"
            End If
        End If
    End Sub

    Protected Sub NextReservationTimer_Tick(ByVal sender As Object, ByVal e As System.EventArgs)
        Me.UpdatePanelNextReservationInfo.DataBind()
    End Sub


    Protected Sub GridView5_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
       
    End Sub

    Protected Sub GridView4_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
        Session("SelectedUID") = Me.GridView4.SelectedValue
        Response.Redirect("editmember.aspx?UID=" & Me.GridView4.SelectedValue)
    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Response.Redirect("MessageBoard.aspx?Status=New")
    End Sub
    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Response.Redirect("SupportRequest.aspx")
    End Sub
   
    Protected Sub GridView6_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
        Response.Redirect("messageboard.aspx?MID=" & Me.GridView6.SelectedValue)
    End Sub

    Protected Sub GridView6_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs)
        If e.Row.RowType = DataControlRowType.DataRow Then
            Dim MessageBoardUserCtrl As Label = CType(e.Row.Cells(1).Controls(1), Label)
            Dim MessageBoardBodyCtrl As Label = CType(e.Row.Cells(3).Controls(1), Label)
            Dim MessageBoardUser = MessageBoardUserCtrl.Text.ToString
            Dim MessageBoardBody = MessageBoardBodyCtrl.Text.ToString
            If Not MessageBoardBody = "" Then
                e.Row.ToolTip = MessageBoardUser & ": " & MessageBoardBody
            End If
        End If
    End Sub

    Protected Sub SqlDataSource1_Updating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.SqlDataSourceCommandEventArgs)
               
    End Sub

    Protected Sub GridView1_SelectedIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewSelectEventArgs)
        'Session("SelectedUID") = GridView1.Rows(GridView1.SelectedIndex).Cells(9).Text
        'Dim vUID As Label = CType(GridView1.SelectedRow.Cells(7).Controls(1), Label)
        ''Session("SelectedUID") = Me.GridView1.Rows(e.NewSelectedIndex).Cells(9).Text
        'Session("SelectedUID") = vUID
        ''GridView4.DataBind()
       
    End Sub

    Protected Sub GridView1_RowCommand(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCommandEventArgs)
        'Dim _gridView As GridView = CType(sender, GridView)
        '_gridView.EditIndex = -1
        '' Get the selected index and the command name
        'Dim _selectedIndex As Integer = Integer.Parse(e.CommandArgument.ToString)
        'Dim _commandName As String = e.CommandName
        'Dim _eventArgument As String = Request.Form("__EVENTARGUMENT")
        'Dim vSelectedUID
       
        'vSelectedUID = CType(GridView1.Rows(_selectedIndex).Cells(9).Controls(1), Label).Text
       
        'Select Case (_commandName)
        '    Case "SingleClick"
        '        _gridView.SelectedIndex = _selectedIndex
        '        Me.GridView1.DataBind()
        '        'Me.Message.Text = (Me.Message.Text + ("rowindex(" _
        '        '            + (_selectedIndex.ToString + (") cellindex(" _
        '        '            + (_eventArgument + ") - SUID(" + vSelectedUID + ")<br />")))))
        '        Session("selectedUID") = vSelectedUID
               
        '    Case "DoubleClick"
        '        _gridView.EditIndex = _selectedIndex
        '        _gridView.SelectedIndex = -1
        '        Me.GridView1.DataBind()
        '        'Me.Message.Text = (Me.Message.Text + ("rowindex(" _
        '        '+ (_selectedIndex.ToString + (") cellindex(" _
        '        '+ (_eventArgument + ") - SUID(" + vSelectedUID + ")<br />")))))
        '        Session("selectedUID") = vSelectedUID
               
        'End Select
        'Response.Redirect("Schedule.aspx")
    End Sub
</script>

<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" runat="Server">

    <script language="javascript" type="text/javascript">
var oldgridSelectedColor;

function setMouseOverColor(element)
{
    oldgridSelectedColor = element.style.backgroundColor;
    element.style.backgroundColor='#96F059';
    element.style.foreColor='white';
    //element.style.cursor='move';
    //element.style.textDecoration='underline';
}

function setMouseOutColor(element)
{
    element.style.backgroundColor=oldgridSelectedColor;
    element.style.textDecoration='none';
}
    </script>

    <div>
        <asp:UpdatePanel ID="ScheduleUpdatePanel1" runat="server">
            <ContentTemplate>
                <table width="100%">
                    <tr>
                        <td valign="top">
                            <asp:UpdatePanel ID="ScheduleUpdatePanel2" runat="server">
                                <ContentTemplate>
                                    <asp:GridView ID="GridView3" runat="server" AutoGenerateColumns="False" CellPadding="4"
                                        DataKeyNames="User_RegID,User_UserName" DataSourceID="SDS_SelectedMembers" ForeColor="#333333"
                                        GridLines="None" Width="370px" Height="20px" PageSize="1" BorderStyle="Solid"
                                        BorderWidth="1px">
                                        <FooterStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />
                                        <Columns>
                                            <asp:BoundField DataField="User_RegID" HeaderText="User_RegID" InsertVisible="False"
                                                ReadOnly="True" SortExpression="User_RegID" Visible="False" />
                                            <asp:BoundField DataField="User_FullName" HeaderText="Navn" SortExpression="User_FullName" />
                                            <asp:BoundField DataField="Expr1" DataFormatString="{0:D}" HeaderText="Udl&#248;bsdato"
                                                HtmlEncode="False" SortExpression="Expr1" />
                                            <asp:TemplateField ShowHeader="False">
                                                <ItemTemplate>
                                                    <asp:LinkButton ID="LinkButton1" runat="server" CausesValidation="false" CommandName=""
                                                        OnClick="LinkButton1_Click" Text="Ændre"></asp:LinkButton>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:HyperLinkField NavigateUrl="~/1_DK/App_Pages_Employees/LoginInfo.aspx" Text="Adgang" />
                                        </Columns>
                                        <RowStyle BackColor="#E3EAEB" />
                                        <HeaderStyle BackColor="#96D059" Font-Bold="True" ForeColor="White" />
                                    </asp:GridView>
                                    <asp:ImageButton ID="ImageButton7" runat="server" ImageUrl="~/Images/soeg_medarbejder.gif"
                                        PostBackUrl="~/1_DK/App_Pages_Employees/SelectMember.aspx" />
                                    <asp:HyperLink ID="HyperLink2" runat="server" NavigateUrl="~/1_DK/App_Pages_Employees/SelectMember.aspx">Find medlem</asp:HyperLink>
                                    <asp:SqlDataSource ID="SDS_SelectedMembers" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                        SelectCommand="SELECT TOP (1) User_RegID, User_FullName, User_email, User_UserName, User_CardValidDate + 365 AS Expr1 FROM tbl_User WHERE (User_RegID = @User_RegID)">
                                        <SelectParameters>
                                            <asp:SessionParameter Name="User_RegID" SessionField="SelectedUID" Type="Decimal" />
                                        </SelectParameters>
                                    </asp:SqlDataSource>
                                    &nbsp;&nbsp;
                                    <asp:Label runat="server" ID="lbl_RemSessionsLabel" Text="Resterende træningsgange" />&nbsp;
                                    <asp:Label ID="Label4" runat="server" Text="0" Width="30px"></asp:Label>&nbsp;<br />
                                    <asp:UpdatePanel ID="UpdatePanel4" runat="server">
                                        <ContentTemplate>
                                            <div style="float: left;">
                                                <asp:Calendar ID="Calendar1" runat="server" BackColor="White" BorderColor="#999999"
                                                    CellPadding="4" DayNameFormat="Shortest" Font-Names="Verdana" Font-Size="8pt"
                                                    ForeColor="Black" OnSelectionChanged="Calendar1_SelectionChanged" Width="370px">
                                                    <SelectedDayStyle BackColor="#96D059" Font-Bold="True" ForeColor="White" />
                                                    <TodayDayStyle BackColor="#CCCCCC" ForeColor="Black" />
                                                    <SelectorStyle BackColor="#CCCCCC" />
                                                    <WeekendDayStyle BackColor="WhiteSmoke" />
                                                    <OtherMonthDayStyle ForeColor="Gray" />
                                                    <NextPrevStyle VerticalAlign="Bottom" />
                                                    <DayHeaderStyle BackColor="WhiteSmoke" Font-Bold="True" Font-Size="7pt" />
                                                    <TitleStyle BackColor="#96D059" BorderColor="Black" Font-Bold="True" ForeColor="White" />
                                                </asp:Calendar>
                                                <h3>
                                                    <asp:Label ID="Label5" runat="server" Width="100%"></asp:Label>
                                            </div>
                                            </H3>
                                        </ContentTemplate>
                                    </asp:UpdatePanel>
                                </ContentTemplate>
                            </asp:UpdatePanel>
                            <asp:Label ID="Message" runat="server" Text="Label" Visible="False"></asp:Label></td>
                        <td valign="top">
                            <table>
                            </table>
                            <asp:UpdatePanel ID="UpdatePanel5" runat="server">
                                <ContentTemplate>
                                    <asp:GridView ID="GridView5" runat="server" AutoGenerateColumns="False" CellPadding="4"
                                        DataSourceID="SqlDataSource3" ForeColor="#333333" GridLines="None" Width="370px"
                                        Height="20px" PageSize="1" BorderStyle="Solid" BorderWidth="1px" OnSelectedIndexChanged="GridView5_SelectedIndexChanged">
                                        <FooterStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />
                                        <Columns>
                                            <asp:BoundField DataField="Center_RegID" HeaderText="Center_RegID" InsertVisible="False"
                                                ReadOnly="True" SortExpression="Center_RegID" Visible="False" />
                                            <asp:BoundField DataField="Center_City" SortExpression="Center_City" HeaderText="Center" />
                                            <asp:BoundField DataField="Center_Zip" SortExpression="Center_Zip" />
                                            <asp:BoundField DataField="Center_Adress" SortExpression="Center_Adress" />
                                        </Columns>
                                        <RowStyle BackColor="#E3EAEB" />
                                        <HeaderStyle BackColor="#96D059" Font-Bold="True" ForeColor="White" />
                                        <AlternatingRowStyle BackColor="White" />
                                    </asp:GridView>
                                    <asp:ImageButton ID="ImageButton8" runat="server" ImageUrl="~/Images/soeg_medlem.gif"
                                        PostBackUrl="~/1_DK/App_Pages_Employees/SelectCenter.aspx" />
                                    <asp:HyperLink ID="HyperLink1" runat="server" NavigateUrl="~/1_DK/App_Pages_Employees/SelectCenter.aspx">Vælg andet center</asp:HyperLink>
                                    <asp:SqlDataSource ID="SqlDataSource3" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                        SelectCommand="SELECT TOP (1) Center_RegID, Center_Name, Center_Adress, Center_Zip, Center_City FROM tbl_Center WHERE (Center_RegID = @Center_RegID)">
                                        <SelectParameters>
                                            <asp:SessionParameter Name="Center_RegID" SessionField="SelectedCenter" />
                                        </SelectParameters>
                                    </asp:SqlDataSource>
                                </ContentTemplate>
                            </asp:UpdatePanel>
                            <asp:UpdatePanel ID="UpdatePanelNextReservationInfo" runat="server" UpdateMode="Conditional">
                                <ContentTemplate>
                                    <asp:Label ID="Label2" runat="server" Text="Næste træning"></asp:Label>
                                    <asp:GridView ID="GridView4" runat="server" AutoGenerateColumns="False" CellPadding="4"
                                        DataSourceID="SDS_NextReservationInfo" ForeColor="#333333" GridLines="None" Width="370px"
                                        BorderStyle="Solid" BorderWidth="1px" OnSelectedIndexChanged="GridView4_SelectedIndexChanged"
                                        DataKeyNames="user_regid" PageSize="2">
                                        <FooterStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" />
                                        <Columns>
                                            <asp:BoundField DataField="Start" DataFormatString="{0:ddd}" HtmlEncode="False" SortExpression="Start" />
                                            <asp:BoundField DataField="Start" DataFormatString="{0:t}" HeaderText="Start" HtmlEncode="False"
                                                SortExpression="Start" />
                                            <asp:TemplateField HeaderText="Name" SortExpression="Name">
                                                <ItemTemplate>
                                                    <asp:Label ID="Label1" runat="server" Text='<%# Bind("Name") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:BoundField DataField="Phone" HeaderText="Phone" SortExpression="Phone" />
                                            <asp:CommandField SelectText="&#198;ndre" ShowSelectButton="True" />
                                        </Columns>
                                        <HeaderStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" />
                                    </asp:GridView>
                                    <asp:SqlDataSource ID="SDS_NextReservationInfo" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                        SelectCommand="SELECT TOP (2) tbl_User.User_FullName AS Name, tbl_Reservations.Reservation_Start AS Start, tbl_User.User_Phone AS Phone, tbl_User.User_RegID FROM tbl_User INNER JOIN tbl_Reservations ON tbl_User.User_RegID = tbl_Reservations.Reservation_lnkUser WHERE (tbl_Reservations.Reservation_lnkCenter = @Reservation_lnkCenter) AND (tbl_Reservations.Reservation_Start > GETDATE()) ORDER BY Start">
                                        <SelectParameters>
                                            <asp:SessionParameter Name="Reservation_lnkCenter" SessionField="SelectedCenter" />
                                        </SelectParameters>
                                    </asp:SqlDataSource>
                                    <asp:GridView ID="GridView6" runat="server" AutoGenerateColumns="False" CellPadding="4"
                                        DataKeyNames="MessageBoard_RegID" DataSourceID="SDS_MessageBoard" ForeColor="#333333"
                                        GridLines="None" PageSize="2" Width="370px" OnSelectedIndexChanged="GridView6_SelectedIndexChanged"
                                        OnRowDataBound="GridView6_RowDataBound">
                                        <FooterStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" />
                                        <Columns>
                                            <asp:CommandField SelectText="Se" ShowSelectButton="True" ButtonType="Image" SelectImageUrl="~/Images/Nye GIF/Note.gif" />
                                            <asp:TemplateField HeaderText="Bruger" SortExpression="User_FullName" Visible="False">
                                                <EditItemTemplate>
                                                    <asp:TextBox ID="TextBox1" runat="server" Text='<%# Bind("User_FullName") %>'></asp:TextBox>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label1" runat="server" Text='<%# Bind("User_FullName") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:BoundField DataField="MessageBoard_Subject" HeaderText="Meddelelser" SortExpression="MessageBoard_Subject" />
                                            <asp:TemplateField HeaderText="MessageBoard_Body" SortExpression="MessageBoard_Body"
                                                Visible="False">
                                                <EditItemTemplate>
                                                    <asp:TextBox ID="TextBox2" runat="server" Text='<%# Bind("MessageBoard_Body") %>'></asp:TextBox>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label2" runat="server" Text='<%# Bind("MessageBoard_Body") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField Visible="False"></asp:TemplateField>
                                            <asp:TemplateField Visible="False"></asp:TemplateField>
                                            <asp:TemplateField>
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton9" runat="server" ImageUrl="~/Images/Nye GIF/Kryds.gif"
                                                        CommandName="delete" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                        </Columns>
                                        <RowStyle BackColor="#F7F6F3" ForeColor="#333333" />
                                        <EditRowStyle BackColor="#999999" />
                                        <SelectedRowStyle BackColor="#E2DED6" Font-Bold="True" ForeColor="#333333" />
                                        <PagerStyle BackColor="#284775" ForeColor="White" HorizontalAlign="Center" />
                                        <HeaderStyle BackColor="#5D7B9D" Font-Bold="True" ForeColor="White" />
                                        <AlternatingRowStyle BackColor="White" ForeColor="#284775" />
                                    </asp:GridView>
                                    <asp:SqlDataSource ID="SDS_MessageBoard" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                        SelectCommand="SELECT tbl_MessageBoard.MessageBoard_CreateUser, tbl_MessageBoard.MessageBoard_CreateDate, tbl_MessageBoard.MessageBoard_Subject, tbl_MessageBoard.MessageBoard_Body, tbl_MessageBoard.MessageBoard_lnkCenter, tbl_MessageBoard.MessageBoard_RegID, tbl_User.User_FullName, tbl_MessageBoard.MessageBoard_Day FROM tbl_MessageBoard LEFT OUTER JOIN tbl_User ON tbl_MessageBoard.MessageBoard_CreateUser = tbl_User.User_RegID WHERE (tbl_MessageBoard.MessageBoard_lnkCenter = @MessageBoard_lnkCenter) AND (tbl_MessageBoard.MessageBoard_Day = @MessageBoard_Day) ORDER BY tbl_MessageBoard.MessageBoard_CreateDate"
                                        UpdateCommand="UPDATE tbl_MessageBoard SET MessageBoard_EditDate = getdate(), MessageBoard_EditUser = @MessageBoard_EditUser, MessageBoard_Read = - 1, MessageBoard_ReadByUser = @MessageBoard_ReadByUser, MessageBoard_RegID = @MessageBoard_RegID"
                                        DeleteCommand="delete from tbl_messageboard where messageboard_regid = @messageboard_regid">
                                        <UpdateParameters>
                                            <asp:SessionParameter Name="MessageBoard_EditUser" SessionField="CurrentUID" />
                                            <asp:SessionParameter Name="MessageBoard_ReadByUser" SessionField="CurrentUID" />
                                            <asp:ControlParameter ControlID="GridView6" Name="MessageBoard_RegID" PropertyName="SelectedValue" />
                                        </UpdateParameters>
                                        <SelectParameters>
                                            <asp:SessionParameter Name="MessageBoard_lnkCenter" SessionField="SelectedCenter" />
                                            <asp:ControlParameter ControlID="Calendar1" Name="MessageBoard_Day" PropertyName="SelectedDate" />
                                        </SelectParameters>
                                        <DeleteParameters>
                                            <asp:Parameter Name="messageboard_regid" />
                                        </DeleteParameters>
                                    </asp:SqlDataSource>
                                    &nbsp;&nbsp;
                                </ContentTemplate>
                                <Triggers>
                                    <asp:AsyncPostBackTrigger ControlID="NextReservationTimer" EventName="Tick" />
                                </Triggers>
                            </asp:UpdatePanel>
                            <table style="width: 370px">
                                <tr>
                                    <td align="left" valign="top">
                                        <asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="Ny meddelelse" /></td>
                                    <td align="right" valign="top">
                                        <asp:Button ID="Button2" runat="server" OnClick="Button2_Click" Text="Support" /></td>
                                </tr>
                            </table>
                            <br />
                            <asp:Label ID="Reservestatus" runat="server" ForeColor="#C00000" Visible="False"></asp:Label>
                            <asp:Timer ID="NextReservationTimer" runat="Server" OnTick="NextReservationTimer_Tick"
                                Interval="300000" />
                            <asp:UpdateProgress ID="UpdateProgress1" runat="server" AssociatedUpdatePanelID="ScheduleUpdatePanel1"
                                DisplayAfter="5000">
                                <ProgressTemplate>
                                    <span style="color: red">
                                        <img src="../../Images/progress.gif" alt="In progress...." style="width: 342px" height="7" /></span>
                                </ProgressTemplate>
                            </asp:UpdateProgress>
                        </td>
                    </tr>
                    <tr>
                        <td valign="top">
                            <asp:UpdatePanel ID="UpdatePanel2" runat="server">
                                <ContentTemplate>
                                    <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataSourceID="SqlDataSource1"
                                        EmptyDataText="Der er ingen reservationer på dagen" CellPadding="4" DataKeyNames="Reservation_RegID"
                                        ForeColor="#333333" GridLines="None" OnDataBound="track1" OnRowUpdating="GridView1_RowUpdating"
                                        Width="370px" BorderStyle="Solid" BorderWidth="1px" HorizontalAlign="Left" OnSelectedIndexChanged="GridView1_SelectedIndexChanged"
                                        OnRowUpdated="GridView1_RowUpdated" OnSelectedIndexChanging="GridView1_SelectedIndexChanging" OnRowCommand="GridView1_RowCommand">
                                        <Columns>
                                            <asp:TemplateField ShowHeader="False">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton1" runat="server" CommandName="update" ImageAlign="TextTop"
                                                        ImageUrl="~/Images/Nye GIF/Plus.gif" ToolTip="Reserver for valgte medlem" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:BoundField DataField="Reservation_Start" HeaderText="Linie 1" SortExpression="Reservation_Start"
                                                DataFormatString="{0:t}" HtmlEncode="False" />
                                            <asp:TemplateField ShowHeader="False" Visible="False">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton3" runat="server" ImageUrl="~/Images/Nye GIF/Pil-til-højre.gif"
                                                        ToolTip="Flyt reservationn indenfor samme dag" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField SortExpression="Reservation_subject" Visible="False">
                                                <EditItemTemplate>
                                                    <asp:TextBox ID="TextBox1" runat="server" Text='<%# Bind("Reservation_subject") %>'></asp:TextBox>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label1" runat="server" Text='<%# Bind("Reservation_subject") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Medlem" SortExpression="User">
                                                <ItemTemplate>
                                                    &nbsp;<asp:Label ID="Label3" runat="server" Text='<%# Bind("User") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField ShowHeader="False" HeaderText="Slet">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton2" runat="server" ImageUrl="~/Images/Nye GIF/Kryds.gif"
                                                        ToolTip="Annuller reservation" CommandName="select" />&nbsp;
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField>
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton4" runat="server" ImageUrl="~/Images/Nye GIF/Note.gif"
                                                        Visible="false" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Reservation_RegID" InsertVisible="False" SortExpression="Reservation_RegID"
                                                Visible="False">
                                                <EditItemTemplate>
                                                    <asp:Label ID="Label1" runat="server" Text='<%# Eval("Reservation_RegID") %>'></asp:Label>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label2" runat="server" Text='<%# Bind("Reservation_RegID") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Note">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton6" runat="server" ImageUrl="~/Images/Nye GIF/Note_pen.gif"
                                                        Visible="False" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Reservation_lnkUser" SortExpression="Reservation_lnkUser"
                                                Visible="False">
                                                <EditItemTemplate>
                                                    <asp:TextBox ID="TextBox2" runat="server" Text='<%# Bind("Reservation_lnkUser") %>'></asp:TextBox>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label4" runat="server" Text='<%# Bind("Reservation_lnkUser") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:ButtonField Text="SingleClick" CommandName="SingleClick" Visible="false" />
                    <asp:ButtonField Text="DoubleClick" CommandName="DoubleClick" Visible="false" />
                                        </Columns>
                                        <FooterStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />
                                        <EditRowStyle BackColor="#7C6F57" />
                                        <SelectedRowStyle Font-Bold="False" ForeColor="#333333" />
                                        <PagerStyle BackColor="#666666" ForeColor="White" HorizontalAlign="Center" />
                                        <HeaderStyle BackColor="#96D059" Font-Bold="True" ForeColor="White" />
                                    </asp:GridView>
                            <asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                ProviderName="<%$ ConnectionStrings:ConnectionString_Concept1010_01.ProviderName %>"
                                SelectCommand="SELECT tbl_Reservations.Reservation_Start, tbl_Reservations.Reservation_lnkTrack, tbl_Reservations.Reservation_RegID, tbl_Reservations.Reservation_lnkUser, tbl_Reservations.Reservation_Subject, tbl_User.User_UserName, tbl_User.User_FullName AS [User] FROM tbl_Reservations LEFT OUTER JOIN tbl_User ON tbl_Reservations.Reservation_lnkUser = tbl_User.User_RegID WHERE (tbl_Reservations.Reservation_Start < @Reservation_Start + 1) AND (tbl_Reservations.Reservation_lnkTrack = 1) AND (tbl_Reservations.Reservation_Start >= @Reservation_Start) AND (tbl_Reservations.Reservation_lnkCenter = @Reservation_lnkCenter) ORDER BY tbl_Reservations.Reservation_Start"
                                UpdateCommand="UPDATE tbl_Reservations SET Reservation_lnkUser = @Reservation_lnkUser WHERE (Reservation_RegID = @Reservation_RegID)"
                                OnUpdating="SqlDataSource1_Updating">
                                <UpdateParameters>
                                    <asp:SessionParameter DefaultValue="" Name="Reservation_lnkUser" SessionField="SelectedUID" />
                                    <asp:ControlParameter ControlID="GridView1" Name="Reservation_RegID" PropertyName="SelectedValue" />
                                </UpdateParameters>
                                <SelectParameters>
                                    <asp:ControlParameter ControlID="Calendar1" Name="Reservation_Start" PropertyName="SelectedDate" />
                                    <asp:SessionParameter Name="Reservation_lnkCenter" SessionField="SelectedCenter" />
                                </SelectParameters>
                            </asp:SqlDataSource>
                                </ContentTemplate>
                            </asp:UpdatePanel>
                            &nbsp;
                        </td>
                        <td valign="top">
                            <asp:UpdatePanel ID="UpdatePanel3" runat="server">
                                <ContentTemplate>
                                    <asp:GridView ID="GridView2" runat="server" AutoGenerateColumns="False" DataSourceID="SqlDataSource2"
                                        EmptyDataText="Der er ingen reservationer på dagen" CellPadding="4" DataKeyNames="Reservation_RegID"
                                        ForeColor="#333333" GridLines="None" OnDataBound="track2" OnRowUpdating="GridView2_RowUpdating"
                                        Width="370px" BorderStyle="Solid" BorderWidth="1px" HorizontalAlign="Left" OnSelectedIndexChanged="GridView2_SelectedIndexChanged"
                                        OnRowUpdated="GridView2_RowUpdated" OnRowDataBound="GridView2_RowDataBound">
                                        <FooterStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />
                                        <Columns>
                                            <asp:TemplateField ShowHeader="False">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton11" runat="server" CommandName="update" ImageAlign="TextTop"
                                                        ImageUrl="~/Images/Nye GIF/Plus.gif" ToolTip="Reserver for valgte medlem" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:BoundField DataField="Reservation_Start" HeaderText="Linie 2" SortExpression="Reservation_Start"
                                                DataFormatString="{0:t}" HtmlEncode="False" />
                                            <asp:TemplateField ShowHeader="False" Visible="False">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton12" runat="server" ImageUrl="~/Images/Nye GIF/Pil-til-højre.gif"
                                                        ToolTip="Flyt reservationn indenfor samme dag" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField SortExpression="Reservation_subject" Visible="False">
                                                <EditItemTemplate>
                                                    <asp:TextBox ID="TextBox1" runat="server" Text='<%# Bind("Reservation_subject") %>'></asp:TextBox>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label2" runat="server" Text='<%# Bind("Reservation_subject") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Medlem" SortExpression="User">
                                                <ItemTemplate>
                                                    &nbsp;<asp:Label ID="Label13" runat="server" Text='<%# Bind("User") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField ShowHeader="False" HeaderText="Slet">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton14" runat="server" ImageUrl="~/Images/Nye GIF/Kryds.gif"
                                                        ToolTip="Annuller reservation" CommandName="select" />&nbsp;
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField>
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton5" runat="server" ImageUrl="~/Images/Nye GIF/Note.gif"
                                                        Visible="false" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Reservation_RegID" InsertVisible="False" SortExpression="Reservation_RegID"
                                                Visible="False">
                                                <EditItemTemplate>
                                                    <asp:Label ID="Label1" runat="server" Text='<%# Eval("Reservation_RegID") %>'></asp:Label>
                                                </EditItemTemplate>
                                                <ItemTemplate>
                                                    <asp:Label ID="Label3" runat="server" Text='<%# Bind("Reservation_RegID") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                            <asp:TemplateField HeaderText="Note">
                                                <ItemTemplate>
                                                    <asp:ImageButton ID="ImageButton16" runat="server" ImageUrl="~/Images/Nye GIF/Note_pen.gif"
                                                        Visible="False" />
                                                </ItemTemplate>
                                            </asp:TemplateField>
                                        </Columns>
                                        <EditRowStyle BackColor="#7C6F57" />
                                        <SelectedRowStyle Font-Bold="False" ForeColor="#333333" />
                                        <PagerStyle BackColor="#666666" ForeColor="White" HorizontalAlign="Center" />
                                        <HeaderStyle BackColor="#96D059" Font-Bold="True" ForeColor="White" />
                                    </asp:GridView>
                                    &nbsp;
                                </ContentTemplate>
                            </asp:UpdatePanel>
                            <asp:SqlDataSource ID="SqlDataSource2" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                ProviderName="<%$ ConnectionStrings:ConnectionString_Concept1010_01.ProviderName %>"
                                SelectCommand="SELECT tbl_Reservations.Reservation_Start, tbl_Reservations.Reservation_lnkTrack, tbl_Reservations.Reservation_RegID, tbl_Reservations.Reservation_lnkUser, tbl_Reservations.Reservation_subject, tbl_User.User_FullName AS [User] FROM tbl_Reservations LEFT OUTER JOIN tbl_User ON tbl_Reservations.Reservation_lnkUser = tbl_User.User_RegID WHERE (tbl_Reservations.Reservation_Start < @Reservation_Start + 1) AND (tbl_Reservations.Reservation_lnkTrack = 2) AND (tbl_Reservations.Reservation_Start >= @Reservation_Start) AND (tbl_Reservations.Reservation_lnkCenter = @Reservation_lnkCenter) ORDER BY tbl_Reservations.Reservation_Start"
                                UpdateCommand="UPDATE tbl_Reservations SET Reservation_lnkUser = @Reservation_lnkUser WHERE (Reservation_RegID = @Reservation_RegID)">
                                <UpdateParameters>
                                    <asp:SessionParameter DefaultValue="" Name="Reservation_lnkUser" SessionField="SelectedUID" />
                                    <asp:ControlParameter ControlID="GridView2" Name="Reservation_RegID" PropertyName="SelectedValue" />
                                </UpdateParameters>
                                <SelectParameters>
                                    <asp:ControlParameter ControlID="Calendar1" Name="Reservation_Start" PropertyName="SelectedDate" />
                                    <asp:SessionParameter Name="Reservation_lnkCenter" SessionField="SelectedCenter" />
                                </SelectParameters>
                            </asp:SqlDataSource>
                            &nbsp;&nbsp;
                        </td>
                    </tr>
                    <tr>
                        <td colspan="2">
                            <asp:SqlDataSource ID="SDS_Xtra" runat="server" ConnectionString="<%$ ConnectionStrings:Concept1010_ConnectionString %>"
                                SelectCommand="SELECT Reservation_lnkUser, Reservation_RegID, Reservation_CreateDate, Reservation_Start, Reservation_lnkTrack FROM tbl_Reservations WHERE (Reservation_lnkTrack = @track) AND (Reservation_Start = @xtraDate) AND (Reservation_lnkCenter = @Reservation_lnkCenter)"
                                UpdateCommand="UPDATE tbl_Reservations SET Reservation_lnkUser = @UserId WHERE (Reservation_RegID = @Regid) AND (Reservation_lnkTrack = @track) AND (Reservation_lnkCenter = @Reservation_lnkCenter)">
                                <UpdateParameters>
                                    <asp:SessionParameter Name="UserId" SessionField="userid" />
                                    <asp:SessionParameter Name="Regid" SessionField="regid" />
                                    <asp:SessionParameter Name="track" SessionField="track" />
                                    <asp:Parameter Name="Reservation_lnkCenter" />
                                </UpdateParameters>
                       
Avatar billede neoman Novice
28. september 2007 - 11:43 #12
Le procédé est comme ceci:

1. Je pose une question.
2. Vous lisez soigneusement la question et lui répondez alors.

Tout en attendant la question ou la réponse, ne faites aucun changement du logiciel.
Avatar billede bjorn_jeppesen Nybegynder
28. september 2007 - 14:27 #13
Pardon monsieur,

Jeg får ikke at vide hvilken cast det er der ikke kan kastes.
Hvordan skal jeg finde det?
Avatar billede neoman Novice
28. september 2007 - 14:32 #14
Du kan kommentere ting ud eller ind, og på den måde finde ud af hvor det går galt.
Du kan steppe gennem din kode med debuggeren
Jeg vil stadig gerne se HELE fejlbeskeden

Jeg GÆTTER at problemet ligger i din handler - har du prøvet 27/09-2007 21:33:15 ? Hvis ikke så prøv, og meld tilbage. Så kan vi tage den derfra.
Avatar billede neoman Novice
28. september 2007 - 14:33 #15
og vil stadig gerne vide hvilken kode vi snakker om mens vi snakker - den som du postede 28/09-2007 02:45:33?
Avatar billede bjorn_jeppesen Nybegynder
09. oktober 2007 - 17:23 #16
Sorry neoman, jeg kæmper stadig med det her.
Jeg har ikkke debugfunktionalitet på den her server, så jeg vil ruykke den et andet sted hen og forsøge igen.
Avatar billede bjorn_jeppesen Nybegynder
13. januar 2008 - 15:27 #17
neoman:
Det var nu meget simpelt når man først fik fat i det.
Jeg erklærede en variabel uden at angive type. Da den kom fra en double forventede den også at blive læst sådan og jeg læste den ude at angive type.........

Du kan kaste et svar og få lidt points
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester