错误类型:
Microsoft VBScript 编译器错误 (0x800A03F2)
缺少标识符
/yychenxi/show_jg.asp,line 133,column 4
Dim type ---^
之前我定义一个记录集为type,如下: <% Dim type Dim typel_numRows Set type = Server.CreateObject("ADODB.Recordset") type.ActiveConnection = MM_rs_STRING type.Source = "SELECT * FROM hy_type" type.CursorType = 0 type.CursorLocation = 2 type.LockType = 1 type.Open() type_all_numRows = 0 %>
后来总提示那个错误,之后百度搜到是因为:Type是VB保留字,不可以作为变量名
而后改为了:
<% Dim type_all Dim type_all_numRows Set type_all = Server.CreateObject("ADODB.Recordset") type_all.ActiveConnection = MM_rs_STRING type_all.Source = "SELECT * FROM hy_type" type_all.CursorType = 0 type_all.CursorLocation = 2 type_all.LockType = 1 type_all.Open() type_all_numRows = 0 %>
就正确了,哈哈
(编辑:李大同)
【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!
|