欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

在代理中通过lotusscript进行页面跳转时,中文参数的有关问题

更新时间: 2014-01-05 03:00:45 责任编辑: Author_N1

 

在代理中通过lotusscript进行页面跳转时,中文参数的问题
在代理中通过lotusscript进行页面跳转时,需要将表单中的一个域作为条件进行跳转,表单保存成功后,用以下语句跳转:
Print "window.location.href='http://192.140.2.1/cs.jsp?id="+rc+"'"
rc是一个文本域,里面存的是中文,现在跳转过去以后,JSP页面得到的是rc是乱码,JSP页面是GB2312的,而且我也做了ISO8859_1的编码转换,但还是乱码,用UTF-8也是乱码,如果rc存的是英文就没问题,请问,是不是需要在lotusscript中将域rc的值先转成gb2312后,再作为参数进行传递,请问应该怎么写或这么解决这个问题。
--参考方法--
建议你将中文用Encode函数转码,JSP再使用decode函数转码得到中文。如下是LS写的urlDecode和urlEncode
---------------------------
Function urlDecode(strTemp As String,strCharset) As String 
%REM
 URL解码函数
 strTemp  需要解码的字符串
 strCharset 字符集 
%END REM
If strTemp <> "" Then  
Dim ns As New NotesSession
Dim doc As NotesDocument  
Set doc=ns.CurrentDatabase.CreateDocument()  
doc.fldTemp = strTemp 
Dim vrnTemp As Variant
  'Msgbox 
--参考方法--
@URLDecode("
--参考方法--
 & strCharset & 
--参考方法--
";"
--参考方法--
 + strTemp +
--参考方法--
")
--参考方法--

vrnTemp = Evaluate(
--参考方法--
@URLDecode("
--参考方法--
 & strCharset & 
--参考方法--
";fldTemp)
--参考方法--
,doc)
urlDecode = vrnTemp(0)
Else
urlDecode = strTemp
End If
End Function

Function urlEncode(strTemp As String,strCharset) As String 
%REM
 URL解码函数
 strTemp  需要解码的字符串
 strCharset 字符集 
%END REM
If strTemp <> "" Then  
Dim ns As New NotesSession
Dim doc As NotesDocument  
Set doc=ns.CurrentDatabase.CreateDocument()  
doc.fldTemp = strTemp 
Dim vrnTemp As Variant
  'Msgbox 
--参考方法--
@URLDecode("
--参考方法--
 & strCharset & 
--参考方法--
";"
--参考方法--
 + strTemp +
--参考方法--
")
--参考方法--

vrnTemp = Evaluate(
--参考方法--
@URLEncode("
--参考方法--
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 03:00:45
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/17242/
本文WWW.DOC100.NET DOC100.NET版权所有。