在线等,看一下是什么原因,第一次写CLASS

shenjp 2004-04-30 06:37:42
<%@ LANGUAGE="VBSCRIPT" %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" Type="text/css" href="css/style.css">
<link rel="stylesheet" Type="text/css" href="css/Register.css">
<title>日中纺WEB管理中心-用户注册</title>
</head>

<body topmargin="50">
<!--#include file="lib/conn.inc"-->
<%
'region 建立注册用户对象
'==========================================================
'创建数据集对象
Set rs=Server.CreateObject("ADODB.recordset")
Class Register
'#字段集#
'------------------------------------
Public _company
'------------------------------------

'#属性集#
'------------------------------------

'设置公司名
Public Property Let Company(CO_Code)
_company = CO_Code
End Property

'取出公司名
Public Property Get Company()
Company = _company
End Property
'------------------------------------

'#方法集#
'------------------------------------
'创建得到部门列表
Public Function getDeptList(coltd)
dim sql
'创建字典对象
Set objDictionary = server.CreateObject("Scripting.Dictionary")
sql = "SELECT Dept_Code,Dept_Name FROM dbo.pb_Department WHERE Company_Code='"&coltd&"'"
Set rs = Conn.Execute(sql)
Do While Not Rs.EOF
objDictionary.Add rs(0),rs(1)
rs.MoveNext
Loop
Rs.Close
getDeptList = objDictionary
End Function
'------------------------------------

End Class
'==========================================================
'end region

%>
<form Method="get" Action="register.asp?">
<table width="650" border="0" cellpadding="0" cellspacing="0" class="table" align="center">
<tr>
<td colspan="2" class="bottom"><!--#INCLUDE FILE=FrameHead.htm--></td>
</tr>










错误信息:
Microsoft VBScript 编译器错误 错误 '800a0408'

无效字符

/sunrise/admin/Register.asp,行 20

Public _company
--------^
...全文
20 2 点赞 打赏 收藏 举报
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
歪歪 2004-04-30
命名规则
变量命名必须遵循 VBScript 的标准命名规则。变量命名必须遵循:
第一个字符必须是字母。
不能包含嵌入的句点。
长度不能超过 255 个字符。
在被声明的作用域内必须唯一。
  • 打赏
  • 举报
回复
歪歪 2004-04-30
不能以下划线开始吧
  • 打赏
  • 举报
回复
相关推荐
发帖
ASP
加入

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2004-04-30 06:37
社区公告
暂无公告