asp页面怎么插入下面在vb中的代码：
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Check1.Value = 0 And Check2.Value = 0 And Check3.Value = 0 Then
Print "ddd"
End If
End Sub
应该什么定义那？

我想你应到asp.net专区中去问问。好象这是有关于Webform的问题，如果要将VB代码插入ASP，就只能用asp.net（*.aspx)，但是也不是将VB代码原分不动地插入，还是要做些改动。
<script language="vb" runat="server">
private sub page_load()
Response.Write ("Hello world!")
end sub
</script>