老师：
我有父亲（father）、孩子（child）两个表：
father表：

FATHERID FATHERNAME
1 李斌
2 张海
3 刘飞
Child表：
CHILDID CHILDNAME FATHERNAME
11 李宁 李斌
12 张波 张海
13 刘佳 刘飞

现在我要问的是：（1）如我删除father表中fathername等于“李斌”的记录时，怎么做才能同时删除child表中fathername等于“李斌”的那条记录？
（2）如我把father表中fathername等于“李斌”的记录修改成“李彬”时，怎么做child表中fathername等于“李斌”的记录也该成“李彬”？
谢谢！

用触发器可以,
也可在这用两条SQL语句完成,

删除:
set rs=...
......
keyfiled="李斌" '据实际设置
sql1="delete from [father] where fathername='" & keyfiled &"'"
sql2="delete from [chile] where fathername='"&keyfiled&'"
rs.open sql1,conn,1,3
rs.open sql2,conn,1,3

这不够详细吗?
用keyfiled接收你上页传递来的参数,选建RECORDSET记录集,
或者:

keyfiled=request("fathername")
sql1="delete from [father] where fathername='" & keyfiled &"'"
sql2="delete from [chile] where fathername='"&keyfiled&'"
conn.execute(sql1)
conn.execute(sql2)

下面是我的代码,只修改到第一个表（Father表）请问怎么修改才能实现我题目的要求，谢谢先！
<%if Request.QueryString("nono")="yesyes" then

FatherID=request("FatherID")
FatherName=request("FatherName")

If FatherName="" Then
response.write "<div align='center'><br><br><br><br><br><br></div>"
response.write "<div align='center'>父亲姓名不能为空<br><br><br></div>"
response.write ("<div align='right'><a href='javascript:history.back( )'><<<我忘了</a></div>")
response.end
end if

BigClassName=replace(trim(Request("BigClassName")),"'","")
BigClassName_en=replace(trim(Request("BigClassName_en")),"'","")

set rs=server.createobject("adodb.recordset")
sql="select * from Father where FatherID="&FatherID
rs.open sql,conn,1,3
rs("FatherName")=FatherName
rs.update
rs.close
response.redirect "Father.asp"
end if
%>
<%
FatherID=request.querystring("FatherID")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Father where FatherID="&FatherID, conn,3,3
%>

试以下
<%if Request.QueryString("nono")="yesyes" then

FatherID=request("FatherID")
FatherName=request("FatherName")

If FatherName="" Then
response.write "<div align='center'><br><br><br><br><br><br></div>"
response.write "<div align='center'>父亲姓名不能为空<br><br><br></div>"
response.write ("<div align='right'><a href='javascript:history.back( )'><<<我忘了</a></div>")
response.end
end if

BigClassName=replace(trim(Request("BigClassName")),"'","")
BigClassName_en=replace(trim(Request("BigClassName_en")),"'","")

set rs=server.createobject("adodb.recordset")

sql1="select * from [father] where fathername='" & FatherName &"'"
sql2="select * from [chile] where fathername='"&FatherNam&'"

rs.open sql,conn,1,3
rs("FatherName")=FatherName
rs.update
rs.close
response.redirect "Father.asp"
end if
%>
<%
FatherID=request.querystring("FatherID")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Father where FatherID="&FatherID, conn,3,3
%>

因为还没执行这两句,

下面要用RS.OPEN SQL1
RS.OPEN SQL2

[此贴子已经被作者于2006-7-7 16:43:43编辑过]

哦！谢谢！