經典ASP加密

文本加密下面的代碼時，它被包含在ASP.NET網站，但拋出，當我在IIS正在運行的錯誤運行在傳統的ASP網頁罰款：經典ASP加密

Dim encData_byte As Byte() = System.Text.Encoding.UTF8.GetBytes(Request("txtPassword")) 
Dim encodedData As String = Convert.ToBase64String(encData_byte)

錯誤被觸發通過以上第一行：

處理URL時服務器上發生錯誤。請聯繫系統管理員。如果您是系統管理員，請點擊此處瞭解有關此錯誤的更多信息。

來源

2013-03-06 user2139250

什麼是錯誤？ – Bassetassen 2013-03-06 09:57:12

處理URL時服務器發生錯誤。請聯繫系統管理員。如果您是系統管理員，請點擊此處瞭解有關此錯誤的更多信息。 – user2139250 2013-03-06 10:05:40

Dim encData_byte As Byte（）= System.Text.Encoding.UTF8.GetBytes（Request（「txtPassword」））在這一行上 – user2139250 2013-03-06 10:15:17

你得到的錯誤不是真正的錯誤。它只是來自服務器的消息。您需要允許「發送錯誤到瀏覽器」控制面板\管理工具 Internet信息服務（IIS）管理器 - >默認Web站點 - > ASP - >調試性能並設定發送錯誤到瀏覽器=真

這會告訴你真正的錯誤和線..

或者您可以聯繫您的服務器技術支持，並要求他們這樣做。

這裏是ASP加密一個簡單的方法

Function encodeString(input) 
Dim newStr : newStr = "" 
for i = 1 to len(input) 
    newStr = newStr & chr((asc(mid(input,i,1))+8)) 
next 
encodeString = newStr 
End Function 

and decrypt: 

Function decodeString(input) 
Dim oldStr : oldStr = "" 
for i = 1 to len(input) 
    oldStr = oldStr & chr((asc(mid(input,i,1))-8)) 
next 
decodeString = oldStr 
End Function

它是不是最好和最快的方式，但它是簡單和工程

跳這有助於

來源

2013-03-06 18:30:33

回答

相關問題