HSBC again..

[Simply_Mike]

Hi to all

I try to change our old web site from classic asp to .net 2.0
Now with the HSBC hash code being a pain, .net does not help at all making things easier.
The code I use in my code behind page (works like a charm on my computer):

Dim hash
Dim ss = "blablablabla"
Dim dtTicksRaw As New DateTime(Year(Now()), Month(Now()), Day(Now()), Hour(Now()), Minute(Now()), Second(Now()))
Dim dtTicksStarts As New DateTime(1970, 9, 1, 0, 0, 0)
Dim ticUnixNow As Long = (dtTicksRaw.Ticks - dtTicksStarts.Ticks) / 10000


Dim list
Dim delimiter
Dim valueArray, wrapper
delimiter = "^"

list = trans_id_Text.Text.ToString & delimiter
list = list & ticUnixNow & delimiter
list = list & "dbresults.asp" & delimiter
list = list & "results.asp" & delimiter
list = list & "UK11111111GBP" & delimiter
list = list & "Simplystuck" & delimiter
list = list & MyTotal & delimiter
list = list & "826" & delimiter
list = list & "Capture" & delimiter
list = list & "Simplystuck" & delimiter
list = list & "T" & delimiter
list = list & "" & delimiter
list = list & bill_firstname_txt.Text.ToString & delimiter
list = list & bill_lastname_txt.Text.ToString & delimiter
list = list & bill_email_txt.Text.ToString & delimiter
list = list & bill_addr_1_txt.Text.ToString & delimiter
list = list & bill_addr_2_txt.Text.ToString & delimiter
list = list & bill_city_txt.Text.ToString & delimiter
list = list & bill_state_txt.Text.ToString & delimiter
list = list & bill_post_code_txt.Text.ToString & delimiter
list = list & "826" & delimiter
list = list & bill_firstname_txt.Text.ToString & delimiter
list = list & bill_lastname_txt.Text.ToString & delimiter
If ship_addr_1_txt.Text > "" Then
list = list & ship_addr_1_txt.Text.ToString & delimiter
Else
list = list & bill_addr_1_txt.Text.ToString & delimiter
End If
If ship_addr_2_txt.Text > "" Then
list = list & ship_addr_2_txt.Text.ToString & delimiter
Else
list = list & bill_addr_2_txt.Text.ToString & delimiter
End If
If ship_city_txt.Text > "" Then
list = list & ship_city_txt.Text.ToString & delimiter
Else
list = list & bill_city_txt.Text.ToString & delimiter
End If
If ship_state_txt.Text > "" Then
list = list & ship_state_txt.Text.ToString & delimiter
Else
list = list & bill_state_txt.Text.ToString & delimiter
End If
If ship_post_code_txt.Text > "" Then
list = list & ship_post_code_txt.Text.ToString & delimiter
Else
list = list & bill_post_code_txt.Text.ToString & delimiter
End If
list = list & "826"

valueArray = Split(list, delimiter)

wrapper = CreateObject("CcCpiCOM.OrderHash")
hash = wrapper.GenerateOrderHash(valueArray, ss)


The Server tells me: Security settings does not allow me to access the CcCpiCom dll.
Now without that, I am stuffed.
Any ideas?
Best regards
Mike

[Staff: Warren Ashcroft]

CreateObject/ActiveX is unmanaged code - which you will not be able to run in Medium Trust environments; if you wish to do this you will need to use our Premier service to get the Full Trust environment.

[RFH Reseller: askjim]

It looks like you are using cpi integration. The first question is does hsbc provide an updated component for asp.net. If not you could think about using api integration which is a bit more complicated in the fact that you have to construct an xml document and send it via http to hsbc and then handle the response.

If neither are suitable look to use another company, world pay is dead easy, realex or protx.

[Simply_Mike]

I do not believe HSBC has ever thought about an updated cpi component.
They are still using the Original files from 2002.
Our reason for using HSBC was the savings (at the moment we pay twice, secpay and HSBC).
With HSBC being our House bank, we intended to cut out the middle man.
We find it very frustrating the one of the world’s biggest banks offers so little support.
I could go the mixed route, by using aspx pages for the web site and use classic asp in the https environment for the payment stage.
Not an ideal solution as I was hoping to hide all sensitive data in compiled code.
best regards

Mike