??Linux系统下B/S结构注册问题,各位帮忙看一下啦

xxxding 2003-08-07 04:40:42
在windows下lotus5.08以下B/S结构注册用户代码测试通过,我知道在linux下要区别"/"和"\",可是我换了以后还是出现问题,各位帮忙看一下啦
......
Dim certidfile As String
certidfile=Session.GetEnvironmentString("CertifierIDFile",True)
certpass=Doc.GetItemValue("certpass")(0)‘验证密码从文档文本域提取

lognsf = Session.GetEnvironmentString("Log",True)
count = Instr(1,lognsf,",")
If count > 1 Then
lognsf = Left(lognsf,count-1)
End If

mailserver = session.GetEnvironmentString("MailServer",True)
datapath = Session.GetEnvironmentString("Directory",True)
Dim iddate As New NotesDateTime(Date)
Call iddate.AdjustYear( QiXian )

Dim reg As New NotesRegistration
reg.CertifierIDFile = certidfile '认证CERT.ID文件
reg.CreateMailDb = True '是否创建邮件数据库
reg.Expiration = Datevalue(iddate.dateonly) 'ID文件的有效时间
reg.IDType = ID_HIERARCHICAL '用户名称的层次结构
reg.IsNorthAmerican = False '是否是北美用户
reg.MinPasswordLength = 0 '最小密码长度
reg.OrgUnit = "" '组织单元名称
reg.RegistrationLog = lognsf '日志记录数据库
reg.RegistrationServer = mailserver'注册通讯录所在的服务器名称
reg.StoreIDInAddressbook = True '决定是否在通讯录中保存ID文件
reg.UpdateAddressbook = True '决定是否更新通讯录

lastname=regDoc.ShortName(0)’此处值从文档中获取
idfile=datapath+"\"+lastname+".id"
regserver=mailserver
firstname=""
middle=""
certpw=certpass
location=""
comment=""
maildbpath="mail/"+regDoc.MailFile(0)+".nsf"’此处值从文档中获取

fwddomain=""
userpw=regDoc.Password(0)’此处值从文档中获取

Call reg.RegisterNewUser(lastname,datapath+"/tmp/"+lastname+".id",regserver,"","",certpw,"","",maildbpath,"",userpw)‘错误出在此服务器保“Error:User-defined error at
line 68 at runreg”

......
...全文
24 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
dingXP 2003-11-12
  • 打赏
  • 举报
回复
qq联系我
xxxding 2003-11-12
  • 打赏
  • 举报
回复
答案发到你的邮箱了!
xxxding 2003-08-08
  • 打赏
  • 举报
回复
up一下

535

社区成员

发帖
与我相关
我的任务
社区描述
企业开发 Exchange Server
社区管理员
  • 消息协作社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧