怎样实现像delphi中的日期时间输入?

Question

<form method="POST" action="1.asp">
  <p>&nbsp; </p>
  <table width="730" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td><object classid="clsid:20DD1B9E-87C4-11D1-8BE3-0000F8754DA1" id="DTPicker1" width="320" height="30" name="DateControl">
          <param name="_ExtentX" value="8467">
          <param name="_ExtentY" value="794">
          <param name="_Version" value="393216">
          <param name="MousePointer" value="0">
          <param name="Enabled" value="1">
          <param name="OLEDropMode" value="0">
          <param name="CalendarBackColor" value="-2147483643">
          <param name="CalendarForeColor" value="-2147483630">
          <param name="CalendarTitleBackColor" value="-2147483633">
          <param name="CalendarTitleForeColor" value="-2147483630">
          <param name="CalendarTrailingForeColor" value="-2147483631">
          <param name="CheckBox" value="0">
          <param name="CustomFormat" value>
          <param name="DateIsNull" value="0">
          <param name="Format" value="662831104">
          <param name="UpDown" value="0">
          <param name="CurrentDate" value="37530">
          <param name="MaxDate" value="2958465">
          <param name="MinDate" value="-109205">
          <param name="value" value="37530">
        </object></td>
    </tr>
    <tr>
      <td><object classid="clsid:20DD1B9E-87C4-11D1-8BE3-0000F8754DA1" id="DTPicker2" width="320" height="30" name="DateControl1">
          <param name="_ExtentX" value="8467">
          <param name="_ExtentY" value="794">
          <param name="_Version" value="393216">
          <param name="MousePointer" value="0">
          <param name="Enabled" value="1">
          <param name="OLEDropMode" value="0">
          <param name="CalendarBackColor" value="-2147483643">
          <param name="CalendarForeColor" value="-2147483630">
          <param name="CalendarTitleBackColor" value="-2147483633">
          <param name="CalendarTitleForeColor" value="-2147483630">
          <param name="CalendarTrailingForeColor" value="-2147483631">
          <param name="CheckBox" value="0">
          <param name="CustomFormat" value>
          <param name="DateIsNull" value="0">
          <param name="Format" value="662831104">
          <param name="UpDown" value="0">
          <param name="CurrentDate" value="37530">
          <param name="MaxDate" value="2958465">
          <param name="MinDate" value="-109205">
          <param name="value" value="37530">
        </object></td>
    </tr>
    <tr>
      <td>
        <input type="submit" value="提交" name="B1">
      </td>
    </tr>
  </table>
  <p>&nbsp; </p>
</form>