---
title: "ASP + Blowfish"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/112083-asp-blowfish"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ironhead"
published: "2004-09-22T06:46:22.000Z"
updated: "2004-09-23T12:57:37.000Z"
replies: 8
views: 308
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/112083-asp-blowfish"
---

# ASP + Blowfish

## #1 — ironhead, 2004-09-22T06:46Z

Är det någon som vet nåt bra ställe eller själv kan/har kod som kan illustrera hur kryptering/dekryptering går till i Blowfish med hjälp av ASP.

Permalänk: https://www.webforum.nu/p/112083

## #2 — ironhead, 2004-09-23T08:23Z

Jag skulle behöva kunna dekryptera en sträng som är krypterad med blowfish.

nyckel har jag.

nån som vet hur man går tillväga?

Permalänk: https://www.webforum.nu/p/1443763

## #3 — Jesper T, 2004-09-23T08:28Z

Skicka texten till mig... :)
Jag har aldrig sätt blowfish i ASP däremot finns det ju classer för VB.

Permalänk: https://www.webforum.nu/p/1443770

## #4 — Jesper T, 2004-09-23T08:37Z

Här är något: <http://www.di-mgt.com.au/src/BlowfishASP.zip>

Permalänk: https://www.webforum.nu/p/1443780

## #5 — ironhead, 2004-09-23T09:05Z

Det är just det Blowfish demo jag har testat, men får inte till det.

Permalänk: https://www.webforum.nu/p/1443791

## #6 — ironhead, 2004-09-23T09:12Z

Jag tar hela mitt problem här ;)

Jag har fått en del strängdata skickat tll mig som först är krypterat med Blowfish & sedan med Base64.

Jag använder denna kod för att först dekoda Base64:

```
	Dim Base64Chars
	Base64Chars =	"ABCDEFGHIJKLMNOPQRSTUVWXYZ" & _
			"abcdefghijklmnopqrstuvwxyz" & _
			"0123456789" & _
			"+/"

	Public Function base64_decode( byVal strIn )
		Dim w1, w2, w3, w4, n, strOut
		For n = 1 To Len( strIn ) Step 4
			w1 = mimedecode( Mid( strIn, n, 1 ) )
			w2 = mimedecode( Mid( strIn, n + 1, 1 ) )
			w3 = mimedecode( Mid( strIn, n + 2, 1 ) )
			w4 = mimedecode( Mid( strIn, n + 3, 1 ) )
			If w2 >= 0 Then _
				strOut = strOut + _
					Chr( ( ( w1 * 4 + Int( w2 / 16 ) ) And 255 ) )
			If w3 >= 0 Then _
				strOut = strOut + _
					Chr( ( ( w2 * 16 + Int( w3 / 4 ) ) And 255 ) )
			If w4 >= 0 Then _
				strOut = strOut + _
					Chr( ( ( w3 * 64 + w4 ) And 255 ) )
		Next
		base64_decode = strOut
	End Function

	Private Function mimedecode( byVal strIn )
		If Len( strIn ) = 0 Then 
			mimedecode = -1 : Exit Function
		Else
			mimedecode = InStr( Base64Chars, strIn ) - 1
		End If
	End Function

myDecodedString = base64_decode( "[sträng som skall avkodas]" )
response.write myDecodedString
```

sedan har jag testat Blowfishdemot (<http://www.di-mgt.com.au/src/BlowfishASP.zip>)på strängen för att få fram datat, men får inte fram nåt vettigt ur strängarna.

Test-sträng:

```
Nyckel -- "12345678"
Original data -- "param1=gegga & param2=mer_gegga"
Kodad  
"Nh2TF2xGO3E%3D=Yh61o5ypcIc%3D&IbgaU4VkBCo%3D=grRTjz179qZ/mny1tbibLw%3D%3D"
```

 

OBS! Dessa strängar är block-krypterade dvs. param1 är krypterad men alla & och = är okrypterade dessutom är strängarna webifierade med "%3D" & "%2D" 

Jag behöver verkligen hjälp med detta...   :(

Permalänk: https://www.webforum.nu/p/1443796

## #7 — ironhead, 2004-09-23T09:26Z

När jag försöker kryptera Orginaldatat ovan med först Blowfish & sedan Base64 får jag ut strängen:

```
RTY1NjI1Rjk1Q0FEMzY5MT1DREQxMEMzMTg1MkNFQkY2JmFtcDswREE5MUFEODVBQTRBM0U2PThEMDY0Qjg5RDgyNDQyNTY5OEE1NjM3NTYyRDVCNkNB
```

Är det helt fel eller?

Finns det flera olika sätt att kryptera strängar med Blowfish?
Om det hjälper någon så kan jag tala om att strängarna är krypterade i Shockwave och skickas till en ASP-sida.

\<-- Totalt förvirrad

Permalänk: https://www.webforum.nu/p/1443804

## #8 — ironhead, 2004-09-23T11:26Z

Detta skall vara ascii-koderna för strängen bara krypterad med Blowfish

```
48,2,207,226,84,125,103,165,226,11,180,252,121,122,242,208,4,194,176,73,175,210,131,43,98,30,181,163,156,169,112,135
```

org.

nyckel = 12345678
param1=gegga& param2=mer_gegga

obs! Det ska inte vara nåt mellanslag i strängen efter gegga&.

Permalänk: https://www.webforum.nu/p/1443851

## #9 — ironhead, 2004-09-23T12:57Z

Kan man konfigurera Blowfish på flera sätt?

Permalänk: https://www.webforum.nu/p/1443909

---

Tråden på webben: https://www.webforum.nu/amne/asp/112083-asp-blowfish