0

ASPコードの下にあるように、ドロップダウンリストの形式でユーザーから日付を取得しようとしています:

ASPコード 

 <div class="content-topwidth">
                    <asp:Label ID="lblDOB" runat="server" Text="Label">Enter DOB</asp:Label>
                    <div id="three-cases-cal">
                    <asp:DropDownList ID="ddlDay" runat="server">
                    </asp:DropDownList>
                    <asp:DropDownList ID="ddlMonth" runat="server">
                    </asp:DropDownList>
                    <asp:DropDownList ID="ddlYear" runat="server">
                    </asp:DropDownList>
                    </div>
                </div>

このようなもの：

生年月日

VB でコーディングし、これらのコンボ ボックスの値をデータベースに保存する必要があります。

例: USERINFOのテーブルがあり、 DOBの列があるため、これらのコンボ ボックスから取得した日付をこの列に dd/mm/yyyy として格納します。

誰でもVBコードで私を助けてくれますか?

ありがとうございました

4

3 に答える 3

0

日、月、年の値を連結し、文字列の日付をorメソッドをDateTime使用して変換する必要があります。DateTime.ParseExactDateTime.TryParseExact

Dim str=ddlDay.SelectedValue & "-" & ddlMonth.SelectedValue & "-" & ddlYear.SelectedValue
Dim myDate as DateTime
IF DateTime.TryParseExact(str,"dd-MM-yyyy",
        System.Globalization.CultureInfo.InvariantCulture,
          System.Globalization.DateTimeStyles.None,myDate) Then
   //valid date
End IF
于 2012-08-08T12:00:46.953 に答える
0

ページの Page_Load イベントにこのコードを書きました。

Protected Sub Page_Load(sender As Object, e As EventArgs)

Dim mdate As String = ddlDay.ToString() & "/" & ddlMonth.ToString() & "/" & ddlYear.ToString()

Dim connection As String = "Data Source=.;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;" 'Change datasource, username and password Datasource may be . or if you have sqlexpress then it be .\SqlExpress

    Dim query As String = "Insret into USERINFO(DOB) VALUES('"&mdate&"');"
    Dim con As New SqlConnection(connection)
    Dim cmd As New SqlCommand()
    cmd.CommandText = query
    cmd.CommandType = CommandType.Text
    cmd.Connection = con
    con.Open()
    cmd.ExecuteNonQuery()
    con.Close()
End Sub
于 2012-08-08T11:01:43.930 に答える
0

これを使用して値を収集し、DateTime に保存します

Dim year as integer = CInt(ddlYear.SelectedValue)
Dim month as integer = CInt(ddlMonth.SelectedValue)
Dim day as integer = CInt(ddlDay.SelectedValue)

Dim DOB as DateTime  = New DateTime(year, month, day)

したがって、DOBをデータベースに保存できます

ページの編集中に値を設定するには

これを使って

ddlYear.SelectedValue = DOB.Year.ToString()
ddlMonth.SelectedValue = DOB.Month.ToString()
ddlDay.SelectedValue = DOB.Day.ToString()
于 2012-08-09T16:42:27.027 に答える