<script language= "VB" runat="server"> sub page_load (sender as object,e as eventargs) if not ispostback then dim id as string id= request("id") Dim ds As New DataSet() ds=createdataset(id) Response.Write ( "<script language='JavaScript'> alert('删除成功!');location.href='delete.aspx';</script>") response.redirect("read.aspx") end if end sub </script> 放在page_load里面,不能通过.删除了这一行,这个程序就没问题. 我感觉是不是因为放在page_load里面的事?还是放在if里面的事?
编译错误 说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30081: “If”必须以匹配的“End If”结束。源错误: 行 12: <script language= "VB" runat="server"> 行 13: sub page_load (sender as object,e as eventargs) 行 14: if not ispostback then 行 15: dim id as string 行 16: id= request("id")
alert('删除成功!');document.location.href='delete.aspx';</script>")
alert('删除成功!');location.href='delete.aspx';</script>")
这个肯定行,我试过N 遍了
sub page_load (sender as object,e as eventargs)
if not ispostback then
dim id as string
id= request("id")
Dim ds As New DataSet()
ds=createdataset(id)
Response.Write ( "<script language='JavaScript'>
alert('删除成功!');location.href='delete.aspx';</script>")
response.redirect("read.aspx")
end if
end sub
</script>
放在page_load里面,不能通过.删除了这一行,这个程序就没问题.
我感觉是不是因为放在page_load里面的事?还是放在if里面的事?
response.write ( "<script language=JavaScript>
{window.alert('删除成功!');this.location.href='delete.aspx'}</script>")
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30081: “If”必须以匹配的“End If”结束。源错误: 行 12: <script language= "VB" runat="server">
行 13: sub page_load (sender as object,e as eventargs)
行 14: if not ispostback then
行 15: dim id as string
行 16: id= request("id")
Response.write("<script language='javascript'>window.alert('hello')</script>")
</script>分成两段,比如"</" + "script>"
这样肯定行的
由于其中包含js的</script> 默认将</script>作为<script language= "VB" runat="server">的结束符
因此程序出错
我这样了试了一下,不成功.谁来帮帮我啊.不要用打括号,还有是document.location,还有就是没一句都要有分号结束
所以最后答案是 response.write ( "<script language=JavaScript>alert('删除成功!');document.location='delete.aspx';</script>")