摘要: **********执行命令********** Public Function Execute(Command) If Not IsObject(Conn) Then ConnectionDatabase If IsDeBug = 0 Then On Error Resume Next Set Execute = Conn.Execute(Command) If... 阅读全文
posted @ 2008-10-08 17:12 自由无价 阅读(163) 评论(0) 推荐(0) 编辑
摘要: ************添加用户**************** 范例 返回") end if rs.close set rs=nothing else %> 添加管理员 用户名: 密码: 角色: 阅读全文
posted @ 2008-10-08 15:45 自由无价 阅读(159) 评论(0) 推荐(0) 编辑