开发过工商银行网上银行B2C商户接口的进来帮帮忙！！！

huangheng1983 2006-10-22 03:59:56

我有一个asp的页面想调用一个java的.class程序
我现在知道调用不起来了
但我现在想把这个页面改成asp.net的页面来调用这个程序
请问我应该怎么样该啊？？

<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<%
Amount=cstr(request.form("Amount") * 100)
OrderID=cstr(request.form("OrderID"))

Dim bb,rc,cc
Set bb =CreateObject("ICBCEBANKUTIL.B2CUtil")
set javaObject=GetObject("java:ReturnValue")

rc=bb.init ("e:\工行小包\asp开发包\user.crt","e:\工行小包\asp开发包\user.crt","e:\工行小包\asp开发包\user.key","12345678")
if rc<>0 then
response.end
end if
src="020000010002" + "http://202.4.131.56/wwwroot/icbc/Gotback.asp" + _
"HS" + OrderID + Amount + "001" + "0"

bsrc = bb.signC(src, Len(src))

If bsrc = "" Then
response.write "签名失败，错误原因:<br>"
response.write bb.getRC
End If

ssrc=javaObject.base64enc(src)

If ssrc = "" Then
response.write "编码失败"
End If

acert=bb.getCert(1)
If cert = "" Then
response.write "获取商户证书失败，错误原因:<br>"
response.write bb.getRC
End If

cert=javaObject.base64enc(acert)

If cert = "" Then
response.write "编码失败"
End If

%>

<form name="sendOrder" method="post"
action="https://mybank.dccnet.com.cn/servlet/com.icbc.inbs.b2c.pay.B2cMerPayReqServlet">
Amount:<%=Amount%><br>
<input type="hidden" name="merchantid" value="020000010002" >
<input type="hidden" name="interfaceType" value="HS" >
<input type="hidden" name="merURL" value="http://202.4.131.56/wwwroot/icbc/Gotback.asp" >
<input type="hidden" name="orderid" value="<%=OrderID%>" >
<input type="hidden" name="amount" value="<%=Amount%>" >
<input type="hidden" name="curType" value="001" >
<input type="hidden" name="hsmsgType" value="0" >
<input type="hidden" name="signMsg" value="<%=ssrc%>" >
<input type="hidden" name="cert" value="<%=cert%>" >
<input type="hidden" name="comment1" value="" >
<input type="hidden" name="comment2" value="" >
<input type="submit" value="工行支付">
</form>
</body>
</html>

...全文