--------aa.asp---------

<script type="text/JavaScript">

function MM_popupMsg(msg) {
  confirm(msg);
}

</script>

<a href="delete_imgfile.asp?id=<%= rs("id") %>" onClick="MM_popupMsg('确定要删除吗？\r')">删除</a>


-----------aa_de.asp--------------

<%
dim id,aa
aa=request("vbok")
if aa=1 then
id=request("id")
else if id <> "" then
set rs = server.CreateObject("ADODB.Recordset")
sql="select * from pro_img where id="&id
rs.open sql,conn,1,1
pic_img=rs("p_pic")

sql2 = "delete from pro_img where id="&id
conn.execute sql2

end if
end if
%>



---------------------

我在aa.asp页面的弹出对话框里无论是单击确认还是取消，传到aa_de.asp后无任何操作，不会删除，也不会跳转页了，请我接收那个对话框的值哪里出错了。。。

有请高手指点指点……

--------aa.asp---------

<script type="text/JavaScript">

function MM_popupMsg(msg,Url) {
  if(confirm(msg))
     self.location=Url;
}

</script>

<a href="javascript:MM_popupMsg('确定要删除吗？\r','delete_imgfile.asp?id=<%= rs("id")%>"'); >删除</a>


-----------aa_de.asp--------------

<%
dim id,aa
aa=request("vbok")
if aa=1 then
id=request("id")
else if id <> "" then
set rs = server.CreateObject("ADODB.Recordset")
sql="select * from pro_img where id="&id
rs.open sql,conn,1,1
pic_img=rs("p_pic")

sql2 = "delete from pro_img where id="&id
conn.execute sql2

end if
end if
%>



---------------------

网页出错，还是不行？？？？

<script type="text/JavaScript">

function m_gg(msg,url) {
 if (confirm(msg))
 self.location=url;
}

</script>


<a href="javascript:m_gg('确定要删除吗？\r','delete_imgfile.asp?id=<%= rs("id")%>"');>删除</a>

<a href="javascript:MM_popupMsg('确定要删除吗？\r','delete_imgfile.asp?id=<%= rs("id")%>"');" >删除</a>
少了个结束的双引号

<a href="http://www. onclick="return confirm('确实要删除此记录吗?');">删除</a>

sql2="Select * from pro_img  where id in ("& trim(Request("id"))&")"
换上这句试试，没有任何操作，应该是传递的ID值没有得到！

8楼的是正解

其他的写法不是不对，而是有些地方写错了