| <Columns> |
| <telerik:GridBoundColumn HeaderText="Quantity" DataField="Quantity" /> |
| <telerik:GridBoundColumn HeaderText="ExpectedQuantity" DataField="ExpectedQuantity" /> |
| <telerik:GridCalculatedColumn HeaderText="Remaining" DataType="System.Int32" |
| Expression="{0}-{1}" DataFields="ExpectedQuantity, Quantity" /> |
| <telerik:GridBoundColumn HeaderText="NDC" DataField="TheDrug.NDC" /> |
| <telerik:GridBoundColumn HeaderText="Name" DataField="TheDrug.DrugName" /> |
| <telerik:GridBoundColumn HeaderText="Lot #" DataField="LotNumber" /> |
| <telerik:GridBoundColumn HeaderText="Expires" DataField="ExpirationDate" /> |
| <telerik:GridButtonColumn CommandName="Delete" Text="Delete" ItemStyle-Font-Underline="true" UniqueName="DeleteColumn" |
| ConfirmText="Remove medication from box?" /> |
| </Columns> |
| )' or ',' expected |
| Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code. |
| Exception Details: Telerik.Web.UI.ParseException: ')' or ',' expected |
| Source Error: |
| An unhandled exception was generated during the execution of the current web request. Information regarding the origin and location of the exception can be identified using the exception stack trace below. |
| Stack Trace: |
| [ParseException: ')' or ',' expected] |
| Telerik.Web.UI.ExpressionParser.ValidateToken(TokenId t, String errorMessage) +89 |
| Telerik.Web.UI.ExpressionParser.ParseNew() +543 |
| Telerik.Web.UI.ExpressionParser.ParseIdentifier() +259 |
| Telerik.Web.UI.ExpressionParser.ParsePrimaryStart() +65 |
| Telerik.Web.UI.ExpressionParser.ParsePrimary() +36 |
| Telerik.Web.UI.ExpressionParser.ParseUnary() +365 |
| Telerik.Web.UI.ExpressionParser.ParseMultiplicative() +54 |
| Telerik.Web.UI.ExpressionParser.ParseAdditive() +54 |
| Telerik.Web.UI.ExpressionParser.ParseComparison() +57 |
| Telerik.Web.UI.ExpressionParser.ParseLogicalAnd() +49 |
| Telerik.Web.UI.ExpressionParser.ParseLogicalOr() +49 |
| Telerik.Web.UI.ExpressionParser.ParseExpression() +60 |
| Telerik.Web.UI.ExpressionParser.Parse(Type resultType) +58 |
| Telerik.Web.UI.DynamicExpression.ParseLambda(ParameterExpression[] parameters, Type resultType, String expression, Object[] values) +81 |
| Telerik.Web.UI.DynamicExpression.ParseLambda(Type itType, Type resultType, String expression, Object[] values) +114 |
| Telerik.Web.UI.GridDynamicQueryable.Select(IQueryable source, String selector, Object[] values) +173 |
| Telerik.Web.UI.GridDataTableFromEnumerable.FillData35() +2699 |
| Telerik.Web.UI.GridDataTableFromEnumerable.FillData() +1010 |
| Telerik.Web.UI.GridResolveEnumerable.Initialize() +55 |
| Telerik.Web.UI.GridResolveEnumerable.EnsureInitialized() +40 |
| Telerik.Web.UI.GridResolveEnumerable.get_DataTable() +31 |
| Telerik.Web.UI.GridEnumerableFromDataView..ctor(GridTableView owner, IEnumerable enumerable, Boolean CaseSensitive, Boolean autoGenerateColumns, GridColumnCollection presentColumns, String[] additionalField, Boolean retrieveAllFields) +221 |
| Telerik.Web.UI.GridDataSourceHelper.CreateGridEnumerable(GridTableView owner, IEnumerable enumerable, Boolean caseSensitive, Boolean autoGenerateColumns, GridColumnCollection presentColumns, String[] additionalField, Boolean retrieveAllFields) +155 |
| Telerik.Web.UI.GridDataSourceHelper.GetResolvedDataSource(GridTableView owner, Object dataSource, String dataMember, Boolean caseSensitive, Boolean autoGenerateColumns, GridColumnCollection presentColumns, String[] additionalField, Boolean retrieveAllFields) +556 |
| Telerik.Web.UI.GridTableView.get_ResolvedDataSource() +219 |
| Telerik.Web.UI.GridTableView.CreateChildControls(IEnumerable dataSource, Boolean useDataSource) +73 |
| System.Web.UI.WebControls.CompositeDataBoundControl.PerformDataBinding(IEnumerable data) +57 |
| System.Web.UI.WebControls.DataBoundControl.OnDataSourceViewSelectCallback(IEnumerable data) +114 |
| System.Web.UI.DataSourceView.Select(DataSourceSelectArguments arguments, DataSourceViewSelectCallback callback) +31 |
| System.Web.UI.WebControls.DataBoundControl.PerformSelect() +142 |
| Telerik.Web.UI.GridTableView.PerformSelect() +28 |
| System.Web.UI.WebControls.BaseDataBoundControl.DataBind() +73 |
| Telerik.Web.UI.GridTableView.DataBind() +368 |
| Telerik.Web.UI.RadGrid.DataBind() +165 |
| Telerik.Web.UI.RadGrid.AutoDataBind(GridRebindReason rebindReason) +3856 |
| Telerik.Web.UI.RadGrid.OnLoad(EventArgs e) +175 |
| System.Web.UI.Control.LoadRecursive() +50 |
| System.Web.UI.Control.LoadRecursive() +141 |
| System.Web.UI.Control.LoadRecursive() +141 |
| System.Web.UI.Control.LoadRecursive() +141 |
| System.Web.UI.Control.LoadRecursive() +141 |
| System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) +627 |
e.Appointment.Attributes.Add(
"style", "Background : #00FFFF !important ; ")
in
rdScheduler_AppointmentCreated
Hi,
I need help on using the Edit and custom form within the grid. this is the first time i am trying to do this, so any one can help me will be great.
I am binding the grid to datasource progmaticaly, and i set the Editmode to EditForms, and i have customized the form.
My grid have only 3 clume: Year, Start Date and End date, and i want to enable the user to update this with in the grid, also to insert new records for each year.
so this what i am trying, and i am sure it's wrong, i am trying to read the fields first to my textbox with in the grid template for the update and then when the user click update it will update the record. so far i can not even read the data into by textboxes. Please help.
Protected Sub grid1_EditCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles grid1.EditCommand
ReadGrid()
Dim sqlstr As String
Dim dr As Data.SqlClient.SqlDataReader
sqlstr =
"select * from acc_accountyear where year='" & CType(e.Item, GridDataItem)("id").Text & "'"
dr = ACCiMS_DB.Read_DR(sqlstr)
While dr.Read
CType(e.Item.FindControl("txt_year"), TextBox).Text = dr("year")
CType(e.Item.FindControl("txt_sd"), TextBox).Text = dr("startdate")
CType(e.Item.FindControl("txt_ed"), TextBox).Text = dr("enddate")
End While
dr.Close()
End Sub
| <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="FEN_CHANGEMENT_INSTALLATION_LOGICIELLE.aspx.vb" Inherits="Interface_RT.FEN_CHANGEMENT_INSTALLATION_LOGICIELLE" %> |
| <%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %> |
| <%@ Register TagPrefix="header" TagName="a" Src="Template.ascx" %> |
| <%@ Register TagPrefix="header" TagName="b" Src="TemplateFin.ascx" %> |
| <!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"> |
| <title>Assistance TI</title> |
| <link href="Style.css" type="text/css" rel="stylesheet"/> |
| </head> |
| <body> |
| <form id="form1" runat="server"> |
| <div> |
| <header:a id="A1" runat="server"></header:a> |
| <asp:scriptmanager ID="ScriptManager1" runat="server" ></asp:scriptmanager> |
| <br /> |
| <table width="70%" align=center> |
| <tr> |
| <td colspan=2 align=center><asp:Label runat=server ID="LbTitre" Text="Installation logiciel" CssClass="TexteBlanc16center"></asp:Label><br /><br /></td> |
| </tr> |
| <tr> |
| <td align="right" width="40%"><asp:Label runat=server ID="LbCodeUtilisateur" Text="Logiciel: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left" width="60%"><telerik:RadTextBox ID="TxtLogiciel" runat="server" Width="200px"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="Label1" Text="Servant à : " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"> |
| <asp:RadioButtonList runat=server ID="RbntListServant" Width="225px" CssClass="TexteBlanc12Left" BorderColor=White BorderWidth=1 > |
| <asp:ListItem Text="L'administratif" Value=1 ></asp:ListItem> |
| <asp:ListItem Text="La pédagogie" Value=2 ></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbLocal" Text="Local(s): " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtLocal" runat="server" Width="200px"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbPersonneContact" Text="Nom de la personne contact: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtPersonneContact" runat="server" Width="200px"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbPosteTelephonique" Text="Poste téléphonique: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtPosteTelephonique" runat="server"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbNoCSBE" Text="No CSBE: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left" > |
| <asp:RadioButtonList runat=server ID="RbntListNoCSBE" AutoPostBack=true Width="225px" BorderColor=White BorderWidth=1 CssClass="TexteBlanc12Left"> |
| <asp:ListItem Text="Tous" Value=1 ></asp:ListItem> |
| <asp:ListItem Text="Poste(s)" Value=2 ></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr id="TableRadgrid" runat=server> |
| <td valign=top align=right><asp:Label runat=server ID="Label3" Text="Postes(#CSBE): " CssClass="TexteBlanc12"></asp:Label></td> |
| <td> |
| <telerik:RadGrid |
| ID="RadGrid_Postes" |
| Skin="Vista" |
| runat="server"> |
| <MasterTableView |
| EditMode="InPlace"> |
| <Columns> |
| <telerik:GridTemplateColumn UniqueName="NoCSBE" HeaderText="# CSBE"> |
| <ItemTemplate> |
| <asp:TextBox ID="TxtNoCsbe" runat="server"></asp:TextBox> |
| </ItemTemplate> |
| </telerik:GridTemplateColumn> |
| </Columns> |
| </MasterTableView> |
| </telerik:RadGrid> |
| <asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="Ajouter une ligne" /> |
| </td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbLicence" Text="Avez vous la licence?: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"> |
| <asp:RadioButtonList runat=server Width="225px" AutoPostBack=true ID="RbntListLicence" BorderColor=White BorderWidth=1 CssClass="TexteBlanc12Left"> |
| <asp:ListItem Text="Non" Value=1></asp:ListItem> |
| <asp:ListItem Text="Oui" Value=2></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr visible=false id="TablePB" runat=server> |
| <td align=right> |
| <asp:Label runat=server ID="LbPB" Text="Poste Budgétaire: " CssClass="TexteBlanc12"></asp:Label> |
| </td> |
| <td align=left> |
| <telerik:RadTextBox ID="TxtPosteBudgetaire" runat="server"></telerik:RadTextBox> |
| </td> |
| </tr> |
| <tr visible=false id="TableNombre" runat=server> |
| <td align=right> |
| <asp:Label runat=server ID="Label2" Text="Quel genre de licence?: " CssClass="TexteBlanc12"></asp:Label> |
| </td> |
| <td align=left> |
| <asp:RadioButtonList runat=server ID="RbntListEtabCommNbre" Width="225px" AutoPostBack=true CssClass="TexteBlanc12Left" BorderColor=White BorderWidth=1> |
| <asp:ListItem Text="Établissement/Commission" Value=1></asp:ListItem> |
| <asp:ListItem Text="Nombre" Value=2></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr visible=false id="TableNombre2" runat=server> |
| <td align=right> |
| <asp:Label runat=server ID="LbNombre" Text="Nombre de licences: " CssClass="TexteBlanc12"></asp:Label> |
| </td> |
| <td align=left> |
| <telerik:RadTextBox ID="RadTextBox1" runat="server"></telerik:RadTextBox> |
| </td> |
| </tr> |
| <tr> |
| <td align="right" valign="top"><asp:Label runat=server ID="LbDescriptionProbleme" Text="Description du problème: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtDescriptionProbleme" TextMode="MultiLine" Height="150px" Width="450px" runat="server"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td> <br /></td> |
| <td align=left ><br /><asp:Button runat=server ID="BtnSauvegarder" Text="Sauvegarder" /></td> |
| </tr> |
| </table> |
| <header:b id="A2" runat="server"></header:b> |
| </div> |
| </form> |
| </body> |
| </html> |
| Imports Telerik.Web.UI |
| Partial Public Class FEN_CHANGEMENT_INSTALLATION_LOGICIELLE |
| Inherits System.Web.UI.Page |
| Public fonctionsvbs As New fonctionsvb |
| Public liste As New List(Of String) |
| Public listcount As Integer |
| Public dt As DataTable |
| Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load |
| If Not IsPostBack Then |
| dt = New DataTable() |
| dt.Columns.Add(New DataColumn("RowNumber", GetType(String))) |
| 'Ajouter le nombre de colonne au début |
| AddRow(dt) |
| AddRow(dt) |
| AddRow(dt) |
| 'Me.RadGrid_Postes.Visible = False |
| Me.RadGrid_Postes.Enabled = False |
| End If |
| End Sub |
| Private Sub BtnSauvegarder_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnSauvegarder.Click |
| Dim sujet As String |
| Dim message As String |
| sujet = "Poste élève portable" |
| message = "$ rt create –t ticket" & _ |
| "<br>Queue: " & Session("sFile") & _ |
| "<br>Subject: Poste élève portable" & _ |
| "<br>Status: new" & _ |
| "<br>Content:Local:" & Me.TxtLocal.Text & " Problème:" & Me.TxtDescriptionProbleme.Text & _ |
| "<br>ENDOFCONTENT()" & _ |
| "<br>Due:" & _ |
| "<br>Starts:" & _ |
| "<br>Started:" & _ |
| "<br>Resolved:" & _ |
| "<br>Owner: " & Session("sPropriétaire") & _ |
| "<br>Requestor: " & Session("sUsager") & _ |
| "<br>Cc:" & _ |
| "<br>AdminCc:" & _ |
| "<br>TimeWorked:" & _ |
| "<br>TimeEstimated:" & _ |
| "<br>TimeLeft:" & _ |
| "<br>Priority: " & _ |
| "<br>InitialPriority:" & _ |
| "<br>FinalPriority:" & _ |
| "<br>DependsOn:" & _ |
| "<br>RefersTo:" & _ |
| "<br>ReferredToBy:" & _ |
| "<br>Children:" & _ |
| "<br>DependsOnBy:" & _ |
| "<br>Parents:" |
| fonctionsvbs.CreerRequis(sujet, message) |
| End Sub |
| Private Sub RbntListLicence_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RbntListLicence.SelectedIndexChanged |
| If RbntListLicence.SelectedValue = 1 Then 'non |
| Me.TablePB.Visible = True |
| Me.TableNombre.Visible = False |
| Me.TableNombre.Visible = False |
| ElseIf RbntListLicence.SelectedValue = 2 Then 'oui |
| Me.TablePB.Visible = False |
| Me.TableNombre.Visible = True |
| End If |
| End Sub |
| Private Sub RbntListEtabCommNbre_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RbntListEtabCommNbre.SelectedIndexChanged |
| If RbntListEtabCommNbre.SelectedValue = 1 Then 'Établissement/Commission |
| Me.TableNombre2.Visible = False |
| ElseIf RbntListEtabCommNbre.SelectedValue = 2 Then 'Nombre |
| Me.TableNombre2.Visible = True |
| End If |
| End Sub |
| Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) |
| Dim countitem As Integer |
| Dim dt As DataTable = DirectCast(ViewState("dt"), DataTable) |
| countitem = RadGrid_Postes.Items.Count |
| Dim cpt As Integer = 0 |
| For Each Item As GridDataItem In RadGrid_Postes.Items |
| Dim txtcode As TextBox = DirectCast(Item("NoCsbe").FindControl("TxtNoCsbe"), TextBox) |
| If Not (txtcode.Text Is Nothing) And txtcode.Text <> "" Then |
| liste.Add(txtcode.Text) |
| End If |
| Next |
| ViewState("dt") = AddRow(dt) |
| listcount = liste.Count |
| RadGrid_Postes.Rebind() |
| While cpt < listcount |
| Dim txtcode As TextBox = DirectCast(RadGrid_Postes.Items(cpt)("NoCsbe").FindControl("TxtNoCsbe"), TextBox) |
| txtcode.Text = liste.Item(cpt) |
| cpt = cpt + 1 |
| End While |
| End Sub |
| Private Sub RadGrid_Postes_NeedDataSource(ByVal source As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles RadGrid_Postes.NeedDataSource |
| If Not IsPostBack Then |
| dt = AddRow(dt) |
| ' call the method to create row |
| ViewState("dt") = dt |
| End If |
| dt = DirectCast(ViewState("dt"), DataTable) |
| RadGrid_Postes.DataSource = dt |
| End Sub |
| Private Function AddRow(ByVal dt As DataTable) As DataTable |
| ' method to create row |
| Dim dr As DataRow = dt.NewRow() |
| dr("RowNumber") = "" |
| dt.Rows.Add(dr) |
| Return dt |
| End Function |
| Private Sub RadGrid_Postes_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGrid_Postes.PreRender |
| ' RadGrid_Postes.MasterTableView.RenderColumns(3).Display = False |
| End Sub |
| Private Sub RbntListNoCSBE_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RbntListNoCSBE.SelectedIndexChanged |
| If RbntListNoCSBE.SelectedValue = 1 Then 'Tous |
| 'Me.TableRadgrid.Visible = False |
| Me.RadGrid_Postes.Enabled = False |
| ElseIf RbntListNoCSBE.SelectedValue = 2 Then 'Postes |
| 'Me.TableRadgrid.Visible = True |
| Me.RadGrid_Postes.Enabled = True |
| End If |
| End Sub |
| End Class |
| <style type="text/css"> |
| div.MfgClass tr.rgAltRow |
| { |
| background-color: red; |
| } |
| </style> |
| <telerik:GridBoundColumn DataField="manufacturer" |
| HeaderText="Mfg" SortExpression="manufacturer" |
| UniqueName="manufacturer" ItemStyle-CssClass="MfgClass"> |
| <HeaderStyle Font-Bold="True" HorizontalAlign="Center" VerticalAlign="Middle" /> |
| </telerik:GridBoundColumn> |