dll 
Author Message
 dll

Hi, anyone out there has a compiled to dll URLEncode function? Or knows
exactly how to do it? Or knows where to get it?

Here is the code that needs to be compiled, it is asp VBScript for formating
the output in asp file for sending as variable to flash.

Function HexChar(ByVal i)
If i < 10 Then
HexChar = Chr(i+Asc("0"))
Else
HexChar = Chr(i-10+Asc("A"))
End If
End Function
Function URLEncode(ByVal s)
Dim result, ch
Do While Len(s) > 0
ch = Asc(s)
s = Right(s, Len(s)-1)
If (ch >= Asc("a") And ch <= Asc("z")) Or (ch >= Asc("A") And ch <=
Asc("Z")) Then
result = result & Chr(ch)
ElseIf ch = Asc(" ") Then
result = result & "+"
Else
result = result & "%" & HexChar(Int(ch/16)) & HexChar(ch Mod 16)
End If
Loop
URLEncode = result
End Function

response.write("&date=" + URLEncode(systemdate))

Any help would be greatly appreciated.

ark

ark_cell



Wed, 13 Aug 2003 07:46:26 GMT  
 dll
oh forget it yep Server.URLEncode()


Quote:
> Hi, anyone out there has a compiled to dll URLEncode function? Or knows
> exactly how to do it? Or knows where to get it?

> Here is the code that needs to be compiled, it is asp vbscript for
formating
> the output in asp file for sending as variable to flash.

> Function HexChar(ByVal i)
> If i < 10 Then
> HexChar = Chr(i+Asc("0"))
> Else
> HexChar = Chr(i-10+Asc("A"))
> End If
> End Function
> Function URLEncode(ByVal s)
> Dim result, ch
> Do While Len(s) > 0
> ch = Asc(s)
> s = Right(s, Len(s)-1)
> If (ch >= Asc("a") And ch <= Asc("z")) Or (ch >= Asc("A") And ch <=
> Asc("Z")) Then
> result = result & Chr(ch)
> ElseIf ch = Asc(" ") Then
> result = result & "+"
> Else
> result = result & "%" & HexChar(Int(ch/16)) & HexChar(ch Mod 16)
> End If
> Loop
> URLEncode = result
> End Function

> response.write("&date=" + URLEncode(systemdate))

> Any help would be greatly appreciated.

> ark

> ark_cell



Wed, 13 Aug 2003 08:19:16 GMT  
 
 [ 2 post ] 

 Relevant Pages 

1. DLL DLL DLL DLL DLL DLL

2. Problems building install file - AutPrx32.dll, AutMgr32.dll, RACMGR32.dll, CLIREG32.exe NOT FOUND

3. REQ: OLEPRO32.DLL, MFC40.DLL, MSVCRT40.DLL from VB4.0 Standard CD

4. MSVCRT.DLL, MSVCRT20.DLL and MSVCRT40.DLL

5. Anyone knows where I can find declarations for shell32.dll, kernel32.dll, comcat.dll and gdi32.dll?

6. Jet VBA File (VBAJet.dll VBAJet32.dll) Initialization failure

7. Vbajet32.dll & vbajet.dll

8. DLL MSLDBUSR.DLL

9. DLL MSLDBUSR.DLL

10. Check DLL-File (Exist DLL-File?)

11. Office2k: vbe6intl.dll / Sprach-dll

12. VB6 DLLs and Windows 2000 DLLs

 

 
Powered by phpBB® Forum Software