Nej,
jag vill få ut hexkoden från en bild för att en SMS tjänst där jag skall skicka bilden kräver att den skall skickas i Hex kod,
har någon någon aning hur jag gör det i ASP
det finns ju en funktion Hex() men den fungerar bara med nummer
------------------
"Brott kanske inte lönar sig, men det är kul"
1. Vi måste få veta mera om själva "filformatet". Finns det någon dokumentation?
2. Det är inte direkt optimalt att behandla binärdata i ett scriptspråk (det kommer att ta tid att konvertera). Det kanske finns någon komponent som gör det du vill?
Okej, det vara bara en liten GIF som skulle konverteras. Då går det att lösa.
Exemplet var i VB, inte VBScript, så ett par modifieringar behövs.
Dim s,hx,strBytes
Dim objStream
Set objStream=Server.CreateObject("ADODB.Stream")
objStream.Type=1
objStream.Open
objStream.LoadFromFile "c:\myimage.gif"
hx = ""
strBytes=objStream.Read
for i=1 to lenB(strBytes)
c=MidB(strBytes,i,1)
If (c <> "") Then
s = Hex(AscB(c))
If (Len(s) = 1) Then
hx = hx + "0" + s
Else
hx = hx + s
End If
end if
Next
objStream.Close
response.write "The hex-encoded GIF file is: " & hx
Dock krävs fortfarande att servern är bestyckad med MDAC 2.5 eller högre. Det borde den vara.
Ett stort tack
Fick mer problem,
koden man ansluter i står också i VBscript.. om det är någon som ´kan konvertera den koden s¨blir jag enormt tacksam =)
------------------
"Brott kanske inte lönar sig, men det är kul"