关于ASP中调RPG程序的问题

navyz

我在ASP中通过Client Access Express ActiveX Object(cwbx.dll)的program对象调用RPG程序,执行成功,但返回结果时报错:
   ...
   cwbx.CodePageConverter.1 错误 '80004005'
   CWBNL0101 — 试图将数据从代码页 1388 转换至 13488 时发生错误
  ...
但类似的代码在VB中就没问题。请高手解答

代码段如下：

<%
  dim as400
  dim prg
  dim parms
  dim strCvtr
  dim longCvtr
  
  set as400=CreateObject("cwbx.AS400System")
  set prg=CreateObject("cwbx.Program")
  set parms=CreateObject("cwbx.ProgramParameters")
  set strCvtr =CreateObject("cwbx.StringConverter")
  set longCvtr =CreateObject("cwbx.LongConverter")
   
  as400.define "AS400SERVER"
  
  as400.UserID = "USER"            
  as400.Password = "PASSWORD"           
  as400.PromptMode = cwbcoPromptNever
  as400.Signon  
                        
  Set prg.System = as400      
  prg.LibraryName = "OBJLIB"
  prg.ProgramName = "MYPROGRAM"
  
  parms.Append "PARM1", 1, 1                    
  parms("PARM1") = strCvtr.ToBytes("3")                  
  
  parms.Append "PARM2", 2, 7                  
  
  prg.Call parms
  
  response.write strCvtr.FromBytes(parms("PARM2").Value)   
%>

注：PARM1为输入，PARM2为输出。

[ 本帖最后由 navyz 于 2005-12-23 19:58 编辑 ]

amaodd

请告诉我ASP 怎么通过 WINDOWS 2000 + IIS 连接AS400啊？？？？

yoyoage

不懂ASP，只知道asp里面有
<% @ Language="VBScript"  Codepage = nnnn %>这样的写法。不知道有没有用。
JSP里面还没有遇到过这样的问题。
关注。。。

pure

所谓ASP连400主要是通过ODBC，与本地连接无甚区别