[RESOLVED] 2 questions!

[GGGuardian]

Question#1
ok i have a problem in my listbox when i pulling the track names of songs in a directory i have hosted on my apache server they have %20 were there is a space shown in the picture and i was woundering is there any way to fix this problem?

Question #2
is there a way to be able to move around a form that has no border as shown in the image below?


thanks in advanced for anyone who can help me or offer their opinions

[baja_yu]

For 1, Search the forum (and/or Google) for an URL Decode function.
For 2, search the forum for "move borderless form"

[GGGuardian]

For 1, Search the forum (and/or Google) for an URL Decode function.
For 2, search the forum for "move borderless form"

ok will do thanks

[GGGuardian]

ok i searched and found this

Public Function urldecode(sText As String) As String
 
Dim sTemp As String
Dim sAns As String
Dim sChar As String
Dim lctr As Long
 
For lctr = 1 To Len(sText)
 
sChar = Mid$(sText, lctr, 1)
 
If sChar = "+" Then
Mid$(sText, lctr, 1) = " "
ElseIf sChar = "%" Then
the_code1 = Mid$(sText, lctr + 1, 2)
the_code = "&H" & the_code1
convert_to = Chr(Val(the_code))
sText = Replace(sText, "%" & the_code1, convert_to)
End If
Next
urldecode = sText
 
End Function

but sadly it did not fix my problem for the URL decode its still the same problem as in the picture for question #1

[VeenaMG]

Hi,

After Populating the list, run this code:

Dim i As Integer
For i = 0 To List1.ListCount-1
List1.List(i) = Replace(List1.List(i), "%20", " ")
Next

Regards
Veena

[GGGuardian]

Hi,

After Populating the list, run this code:

Dim i As Integer
For i = 0 To List1.ListCount-1
List1.List(i) = Replace(List1.List(i), "%20", " ")
Next

Regards
Veena

Thank you it worked great

[baja_yu]

That will only decode the Space character. There could be other special characters that get coded in an URL that you will need to decode.