Ciao Moreno
Ancora dopo mesi sono fermo sul gap della data S.O. inglese.
Proprio non riesco a risolvere, per quantoriguarda la scrittura OK nessun problema ma nella pagina che ti sto perpostare proprio non c'è verso.
Ti chiedo un aiuto grazie.
<%@ Page Title="" Language="VB" MasterPageFile="~/SuperAdmin/MasterPage.master" EnableEventValidation="false" AutoEventWireup="false" CodeFile="BrevettiConsegnatiGenPro.aspx.vb" Inherits="SuperAdmin_BrevettiIstruttoriPro" %>
<%@ Register assembly="AjaxControlToolkit" namespace="AjaxControlToolkit" tagprefix="asp" %>
<asp:Content ID="Content1" runat="server" contentplaceholderid="immagine">
<script>
EnableScriptGlobalization = "True"
</script>
<table class="auto-style26">
<tr>
<td class="auto-style27">
<strong>Record:</strong><asp:Label ID="LblRecord" runat="server"></asp:Label>
<br />
Data Da: <asp:TextBox ID="TxtDataDa" runat="server"></asp:TextBox>
A: <asp:TextBox ID="TxtDataA" runat="server"></asp:TextBox>
<asp:CalendarExtender ID="TxtDataDa_Calendar" runat="server" Enabled="True" TargetControlID="TxtDataDa" >
</asp:CalendarExtender>
<asp:CalendarExtender ID="TxtDataA_Calendar" runat="server" Enabled="True" TargetControlID="TxtDataA" >
</asp:CalendarExtender>
<asp:Button ID="BtnSearch" runat="server" Text="CERCA" CausesValidation="false" CommandArgument ="" />
<asp:Button ID="BtnReset" runat="server" Text="RESET" />
<asp:imageButton ID="BtnExcel" runat="server" ImageUrl="~/Immagini/Microsoft-Excel-icon.png" BackColor="White" BorderColor="Black" BorderStyle="None" BorderWidth="1px" CausesValidation="False" style="text-align: center" Visible="false" />
<asp:Label ID="LblExcel" runat="server" Text="EXPORT EXCEL" Visible="false"></asp:Label>
</td>
</tr>
</table>
<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataSourceID="BrevettiConsPro" PageSize="9999">
<Columns>
<asp:BoundField DataField="P_Cognome" HeaderText="SURNAME" SortExpression="P_Cognome" />
<asp:BoundField DataField="P_Nome" HeaderText="NAME" SortExpression="P_Nome" />
<asp:BoundField DataField="CertTrainer" HeaderText="CERTIFICATION" SortExpression="CertTrainer" />
<asp:BoundField DataField="Specialità" HeaderText="SPECIALITY" SortExpression="Specialità" />
<asp:TemplateField HeaderText="TRAINER" SortExpression="SurnameTra">
<EditItemTemplate>
<asp:TextBox ID="TextBox1" runat="server" Text='<%# Bind("SurnameTra") %>'></asp:TextBox>
</EditItemTemplate>
<ItemTemplate>
<asp:Label ID="Label1" runat="server" Text='<%# Bind("SurnameTra") %>'></asp:Label>
<br />
<asp:Label ID="Label2" runat="server" Text='<%# Bind("NameTra")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField DataField="NameTra" HeaderText="NameTra" SortExpression="NameTra" Visible="False" />
<asp:BoundField DataField="Sigla" HeaderText="ACRONYM" SortExpression="Sigla" />
<asp:BoundField DataField="DataConvalida" HeaderText="VALIDATION DATE" SortExpression="DataConvalida" DataFormatString="{0:d}" />
</Columns>
<HeaderStyle BackColor="Blue" ForeColor="White" />
</asp:GridView>
<asp:SqlDataSource ID="BrevettiConsPro" runat="server" ConnectionString="<%$ ConnectionStrings:EsaWebConnectionString %>"
SelectCommand="SELECT [P_Cognome], [P_Nome], [Specialità], [SurnameTra], [NameTra], [Sigla], [DataConvalida], [CertTrainer]
FROM [V_BrevettiConsegnatiPro] WHERE [DataConvalida] BETWEEN @DataCertificazione_Da AND @DataCertificazione_A ORDER BY [DataConvalida]">
<SelectParameters>
<asp:ControlParameter ControlID="TxtDataDa" Name="DataCertificazione_Da" PropertyName="Text" Type="DateTime" />
<asp:ControlParameter ControlID="TxtDataA" Name="DataCertificazione_A" PropertyName="Text" Type="DateTime" />
</SelectParameters>
</asp:SqlDataSource>
<br />
<table align="center" class="auto-style13">
<tr>
<td align ="center">
<br />
<br />
</td>
</tr>
</table>
</asp:Content>
VB Net
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim I As New Class1
Dim pagina As String = I.Control(pagina:=1)
If Not String.IsNullOrEmpty(TxtDataDa.Text) And Not String.IsNullOrEmpty(TxtDataA.Text) Then
Dim cmd As New SqlCommand("SELECT Count (*) FROM [V_BrevettiConsegnatiPro] WHERE [DataConvalida] BETWEEN @DataCertificazione_Da AND @DataCertificazione_A", conn)
cmd.Parameters.AddWithValue("@DataCertificazione_Da", SqlDbType.Date).Value = CDate(TxtDataDa.Text)
cmd.Parameters.AddWithValue("@DataCertificazione_A", SqlDbType.Date).Value = CDate(TxtDataA.Text)
conn.Open()
LblRecord.Text = cmd.ExecuteScalar
conn.Close()
Else
LblRecord.Text = ""
End If
End Sub
Il problema risiede proprio nella pagina VB , anche con il parse non itepreta la data. ho seguito i tuoi consigli sul cambio della lingua per poter testare meglio, e li ho gli errori. Il parse da questo form l'ho rimosso per poter far funzionare la pagina almeno in italiano.
Grazie 1000
Modificato da Oiram il 07 dicembre 2015 10.38 -
