2
Dear All
In my application i am using VS.Net 2002 , C# . there is asp page Bank.asp .
i am redirecting our users from our site to Bank site along with some parameters user is able to go there does his payment .there is button which againg redirect user to my site Clicking on that button bank post data to our site but as i click on that button.
there is an error message as follows.
The page cannot be displayed
There is a problem with the page you are trying to reach and it cannot be displayed.
--------------------------------------------------------------------------------
Please try the following:
Click the Refresh button, or try again later.
Open the www.airports-ecom.gov.in home page, and then look for links to the information you want.
HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services
--------------------------------------------------------------------------------
Technical Information (for support personnel)
Error Type:
Server object, ASP 0177 (0x8007007E)
8007007e
/Bank.asp, line 22
Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; .NET CLR 1.1.4322; .NET CLR 1.0.3705)
Page:
POST 172 bytes to /Bank.asp
POST Data:
AAIMsgVal=BNSBIDEL%5EAAIMUM%5E11-02-2004+14%3A53%5EF%5E6035%5E29-09-2006+06%3A35%5E02062867965%5E0%5ET200402110001%5E1 %5ET%5E%5E%5E&Submit1=CLICK+HERE+TO+RETURN+TO+AAI+ SITE
Time:
Friday, September 29, 2006, 1:33:14 PM
More information:
Microsoft Support
where Bank.asp is only one asp page in my project.
Source code of Bank.asp page is as follows
<%@ Language=VBScript %>
<html>
<head>
<title>AAI</title>
</head>
<body>
<%
'This asp page is used to receive atc/abc messages from the banks.They HTTP post the strings to AAI's site: www.airports-ecom.gov.in\BANK.asp
dim a,b,c,d
dim vConnObj,oCnn,Qry
'a =Request.Form("usr_name")
'b =Request.Form("pwd")
'if (a="test" and b="test") then
c =Request.Form("AAIMsgVal")
if c <>"" then
Set oCnn = CreateObject("ADODB.Recordset")
set vConnObj= Server.CreateObject("ConnProj.ConnCls")
Qry = "select BIZ_SQN.nextval from dual"
oCnn.Open Qry, vConnObj.OracleConnection("AAIDEL")
'oCnn.Close() ' Added on 22/05/06
d=cstr(c)
Dim fso, f1, sss,vExt,i
' vExtArr()=Split(c,"^")
'Commented and Modified by Mohit on 27/01/2006 as the ouptput after 8th iteration was
'not as expected. The loop has to iterate 9times for the same, so that it picks up the
'correct character and gives the file a right extension.
'FOR i=1 to 8
FOR i=1 to 9
d=mid(d,instr(1,d,"^",1)+1)
next
vExt=mid(d,1,1)
set fso = CreateObject("Scripting.FileSystemObject")
set f1 = fso.CreateTextFile("\\<ipaddress>\ftpsite\otp_io\a ai\files\in\banktoaai"+cstr(oCnn.Fields(0))+".a"+c hr(asc(vExt)+32)+"c",true)
' set f1 = fso.CreateTextFile("c:\biztalk_process\bn\banktoaa i"+cstr(oCnn.Fields(0))+".a"+chr(asc(vExt)+32)+"c" ,true)
' set f1 = fso.CreateTextFile("c:\temp\banktoaai"+".a"+chr(as c(vExt)+32)+"c",true)
sss= c
sss=replace(sss,"~",chr(10))
sss=replace(sss,"^",chr(29))
f1.write sss 'Write to the atc/abc file created in c:\biztalk_process\bn\ with the name banktoaai <sequence nmbr frmAAIDEL>.atc or .abc
response.write("Data posted successfully")
f1.close
else
response.write("No data posted")
end if
%>
</body>
</html>
===========
Plz let me know about that problem with solution. i have unregistered and registered the dll. but the result is same.
Thanks & Regards
Gulrez Alam
