ACC表名:zdgz
ACC表欄位名:ID(自動編號),Year,month,week,classid,XH,NR,ZRR,AddTime,LRR,BZ
錄入頁面:
第一行選擇classid,代碼如下:
<tr>
<td height="24" align="right">作業類別:</td>
<td>
<select class='common-input' name="classid">
<option value="https://bbs.csdn.net/topics/0">請選擇重點作業類別</option>
<% sql2 = "select * from zdgz_Class where topid=1 order by Num asc"
Set rs2 = Server.CreateObject("ADODB.RecordSet")
rs2.Open sql2,conn,1,1
while not rs2.eof
%>
<option value='https://bbs.csdn.net/topics/<%=rs2("id")%>' <% if cint(Classid)=cint(rs2("id")) then response.write "selected" %>> <%=rs2("ClassName")%></option>
<%
rs2.movenext
wend
rs2.close
set rs2=nothing
%>
</select>
</td>
</tr>
第二行分別輸入Year,month,week三個欄位內容,
下面是重點,第三行表格內分別輸入XH,NR,ZRR,BZ四個欄位內容,后面有“增加”和“洗掉”按鈕,每點擊“增加”按鈕便增加一行,點擊“洗掉”按鈕便洗掉該行
最后點擊“提交”按鈕,頁面每行XH,NR,ZRR,BZ四個欄位錄入內容增加到資料庫對應欄位(頁面幾行就在資料庫中添加幾條記錄),classid、Year、month、week四個欄位值錄入資料庫中每行記錄對應的欄位,LRR欄位自動呼叫登錄用戶<%=session("Name")%>填入表中錄入的每行的LRR欄位,取當前日期(yyyy-mm-dd)自動錄入到表中每條記錄的AddTime欄位中。
求ASP代碼,不勝感激!
轉載請註明出處,本文鏈接:https://www.uj5u.com/qianduan/272411.html
標籤:ASP
下一篇:svn無法檢出專案
