ASP问题:为什么二级目录无法编辑

来源:百度知道 编辑:UC知道 时间:2024/05/31 14:41:24
设计一个档案管理系统,三级结构是:案卷-分案卷-档案
案卷表ClassDossier有案卷号ClasssID,案卷名称ClassTitle 类型分别为:int, varchar
分案卷表SubDossier有案卷号ClasssID,分案卷号SubID,分案卷名称SubTitle 类型分别为:int,int, varchar
问题是:
在没有建立表之间关联的情况下
前一页通过<td ><a href="SubDossierManage.asp?classid=<%=Rs("classid")%>"><%=Rs("classtitle")%>
</td>
将一级目录:案卷号classid传递给本页面

本页代码:
<%
Dim classid
classid=Request("classid")
Set Rs = Server.CreateObject("ADODB.RecordSet")
Sql="Select * From SubDossier where ClassID="&ClassID&" Order By SubID "
Rs.Open Sql,conn,3,3
If Rs.Eof And Rs.Bof Then
Response.Write "<tr><td height='30' bgcolor='#FFFFFF'>该案卷还没有分案卷!"
Response.Write "</td></tr>"
Else
Do While not Rs.Eof
%>
<tr bgcolor="#FFFFFF">

你修改成功后返回时还得把 classid 传回去.

显示分案卷正常,当修改案卷时,
<% If Request("action")="Edit" Then
SubID=request("SubID")
Set Rs = Server.CreateObject("ADODB.Recordset")
Sql="Select SubID,SubTitle From SubDossier Where classid="&classid&" and SubID="&SubID
Rs.Open Sql,conn,3,3

这样写就应该可以了

Sql="Select SubID,SubTitle From SubDossier Where classid="&classid&" and SubID="&SubID

显示分案卷正常,当修改案卷时,
<% If Request("action")="Edit" Then
Set Rs = Server.CreateObject("ADODB.Recordset")
Sql="Select SubID,SubTitle From SubDossier Where classid="&classid&" and SubID="&Rs("SubID")
Rs.Open Sql,conn,3,3
没有找到项目?

这句里面的Sql中,最后的Rs("SubID") 是哪里来的???看你上面写的东西,这里的SubID的值应该是从参数中获取的,而不是从结果集中取吧

应该是用request("SubID")

Sql="Select SubID,SubTitle From