临时管理规约的内容:急问此段ASP代码错在哪儿？？？？

是你的if块语句中的elseif错误了

elseif要连在一起，“elseif”和“else if”不是等同的，写成else if 系统回认为是一个else中包含了另外一个if语句，所以最后认为你缺少end if而提示你缺少 'End' 。

把
else if Request("delfrck")="将产品删除出库" then
这句修改为
elseif Request("delfrck")="将产品删除出库" then
就可以了。

这样子就可以了
<%
prid=Replace(Request("prdctid"),"'","''")
'取得用户输入的产品编号
productid=Cint(prid)
'取得用户输入的产品名称
productname=Replace(Request("prdctname"),"'","''")
'取得用户选择的存储仓库
cknumber=Cint(Request("cknum"))
set cnobj=Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("#alidb.mdb")
cnobj.Connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Date Source="&dbpath
cnobj.open
if Request("adinck")="将产品加入仓库" then
sqlcmd="INSERT INTO prdct(产品编号,存储仓库,产品名称)VALUES('"&productid&"','"&cknumber&"','"&productname&"')"
else if Request("delfrck")="将产品删除出库" then
sqlcmd="DELETE FROM prdct WHERE 产品编号='"&productid&"'"
end if
cnobj.Execute sqlcmd
end if
%>

电脑不是告诉你了吗？缺少 'End' 。