register.asp

sdf

                    <OPTION value=吉林省 <%if rs("hka") ="吉林省" then Response.Write "selected"%>>吉林省 
                    <OPTION value=江苏省 <%if rs("hka") ="江苏省" then Response.Write "selected"%>>江苏省 
                    <OPTION value=江西省 <%if rs("hka") ="江西省" then Response.Write "selected"%>>江西省 
                    <OPTION value=辽宁省 <%if rs("hka") ="辽宁省" then Response.Write "selected"%>>辽宁省 
                    <OPTION value=青海省 <%if rs("hka") ="青海省" then Response.Write "selected"%>>青海省 
                    <OPTION value=山东省 <%if rs("hka") ="山东省" then Response.Write "selected"%>>山东省 
                    <OPTION value=山西省 <%if rs("hka") ="山西省" then Response.Write "selected"%>>山西省 
                    <OPTION value=陕西省 <%if rs("hka") ="陕西省" then Response.Write "selected"%>>陕西省 
                    <OPTION value=云南省 <%if rs("hka") ="云南省" then Response.Write "selected"%>>云南省 
                    <OPTION value=浙江省 <%if rs("hka") ="浙江省" then Response.Write "selected"%>>浙江省 
                    <OPTION value=黑龙江省 <%if rs("hka") ="黑龙江省" then Response.Write "selected"%>>黑龙江省 
                    <OPTION value=宁夏自治区 <%if rs("hka") ="宁夏自治区" then Response.Write "selected"%>>宁夏自治区 
                    <OPTION value=新疆自治区 <%if rs("hka") ="新疆自治区" then Response.Write "selected"%>>新疆自治区 
                    <OPTION value=西藏自治区 <%if rs("hka") ="西藏自治区" then Response.Write "selected"%>>西藏自治区 
                    <OPTION value=内蒙古自治区 <%if rs("hka") ="内蒙古自治区" then Response.Write "selected"%>>内蒙古自治区 
                    <OPTION value=香港特别行政区 <%if rs("hka") ="香港特别行政区" then Response.Write "selected"%>>香港特别行政区 
                    <OPTION value=澳门特别行政区 <%if rs("hka") ="澳门特别行政区" then Response.Write "selected"%>>澳门特别行政区 
                    <OPTION value=台湾省 <%if rs("hka") ="台湾省" then Response.Write "selected"%>>台湾省
                  </SELECT>
                </p>
              </td>
            </tr>
            <tr> 
              <td width="417" height="28"> 
                <p align="left"> &nbsp;您最高的教育程度:
                  <SELECT size=1 
                  name=edu>
                    <OPTION>请在以下列表中选择</OPTION>
                    <OPTION value=初中 <%if rs("edu") ="初中" then Response.Write "selected"%>>初中 
                    <OPTION value=高中 <%if rs("edu") ="高中" then Response.Write "selected"%>>高中 
                    <OPTION value=中技 <%if rs("edu") ="中技" then Response.Write "selected"%>>中技 
                    <OPTION value=中专 <%if rs("edu") ="中专" then Response.Write "selected"%>>中专 
                    <OPTION value=大专 <%if rs("edu") ="大专" then Response.Write "selected"%>>大专 
                    <OPTION value=本科 <%if rs("edu") ="本科" then Response.Write "selected"%>>本科 
                    <OPTION value=硕士 <%if rs("edu") ="硕士" then Response.Write "selected"%>>硕士 
                    <OPTION value=博士 <%if rs("edu") ="博士" then Response.Write "selected"%>>博士</OPTION>
                  </SELECT>
                </p>
              </td>
            </tr>
            <tr> 
              <td width="417" height="28" bgcolor="#F3F3F3"> 
                <p align="left"> &nbsp;专 业:<INPUT maxLength=60 size=30                            
                  name=zye maxLength=30 value="<%=rs("zye")%>"></p>
              </td>
            </tr>
            <tr> 
              <td width="417" height="28"> 
                <p align="left"> &nbsp;毕业院校:<INPUT maxLength=60 size=40 
                  name=school maxLength=40 value="<%=rs("school")%>"></p>
              </td>
            </tr>
            <tr> 
              <td width="417" height="28" bgcolor="#F3F3F3"> 
                <p align="left"> &nbsp;政治面貌:
                  <SELECT size=1 name=zzmm>
                    <OPTION>请在以下列表中选择</OPTION>
                    <OPTION value=党员 <%if rs("zzmm") ="党员" then Response.Write "selected"%>>党员 
                    <OPTION value=团员 <%if rs("zzmm") ="团员" then Response.Write "selected"%>>团员 
                    <OPTION value=群众 <%if rs("zzmm") ="群众" then Response.Write "selected"%>>群众 
                    <OPTION value=民主党派 <%if rs("zzmm") ="民主党派" then Response.Write "selected"%>>民主党派 
                    <OPTION value=其它 <%if rs("zzmm") ="其它" then Response.Write "selected"%>>其它</OPTION>
                  </SELECT>
                </p>
              </td>
            </tr>
            <tr> 
              <td width="417" height="28"> 
                <p align="left"> &nbsp;现有职称:
                  <SELECT size=1 name=zchen>
                    <OPTION>请在以下列表中选择</OPTION>
                    <OPTION value=高级 <%if rs("zchen") ="高级" then Response.Write "selected"%>>高级 
                    <OPTION value=中级 <%if rs("zchen") ="中级" then Response.Write "selected"%>>中级 
                    <OPTION value=初级 <%if rs("zchen") ="初级" then Response.Write "selected"%>>初级 
                    <OPTION value=暂无 <%if rs("zchen") ="暂无" then Response.Write "selected"%>>暂无 
                   </SELECT>
                </p>
              </td>
            </tr>
            <tr> 
              <td valign="top" width="417"> 
                <p align="center"> <br>
                  <% if modify<>"ture" then %>
                  <input type="button" value="下一步" onClick="checkmod()">
                </p>
                <%else%>
                <input type="button" value="更 新" onClick="checkmod()">
                <br>
                <%end if%>
                <br>
              </td>
            </tr>
          </table>
        </td><center>
        <td width="1" height="243" valign="top" bgcolor="#00006A"></td>
        <td width="138" height="243" valign="top" bgcolor="#F3F3F3">　</td>
      </tr>
      <tr> 
        <td width="760" height="1" valign="top" colspan="5" bgcolor="#396BA5"> 
          <p align="center"> 
        </td>
      </tr>
    </table>
    
  </div>
</form>
</body>

</html>
<% bday=request("bday") 
if bday="" then Response.End
sex=request("sex")
high=request("high")
iname=request("iname")
code=request("code")
mzhu=request("mzhu")
marry=request("marry")
hka=request("hka")
zye=request("zye")
edu=request("edu")
school=request("school")
zzmm=request("zzmm")
zchen=request("zchen")
if iname="" then iname=rs("iname") end if
rs.close
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from person where uname='"&uname&"'"
rs.open sql,conn,3,3
rs("iname")=iname
rs("code")=code
rs("mzhu")=mzhu
rs("marry")=marry
rs("zzmm")=zzmm
rs("zchen")=zchen
rs("bday")=bday
rs("sex")=sex
rs("hka")=hka
rs("zye")=zye
rs("edu")=edu
rs("school")=school
rs.update
rs.close
if modify<>"ture" then
Response.Redirect "register2.asp" 
else
Response.Redirect "modify.asp" 
end if %>