VB INET space

[piosmexeri]

as poume oti exoume settarei ena inet gia ftp exoume dosei pass ,user,port ktl ...

pao na ekteleso tin edoli<p>inet.execute , "PUT c:\apo edo\test.txt test.txt"<p>ke omos exo prob dioti to onoma tou fakelou me to arxio test.txt exi SPACE ...ke den kani to tranfer...giati nomizi pos to ena arxio ine to

(c:\apo) ke to allo (edo\test.txt test.txt)

kati pou fisika den isxii..

xeri kanis ti kanoume se afti tin periptosi ??

[piosmexeri]

vrika to onoma to fakelou meso dos ke itan "apoedo~1" ke otan to evala stin thesi tou "apo edo" litourgise...alla merika arxia i fakeloi adi gia ~1 exoun ~2 (osa xepernun tous 8 xaraktires) ...tsp den ginete omos kathe fora na pao meso dos..so xeri kanis kana allo tropo + episis mipos xeri kanis pote beni to ~1 i to ~2 ?<p>[ 17-02-2002: Το μήνυμα επεξεργάστηκε από: piosmexeri ]</p>

[piosmexeri]

GENERAL :

Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal lBuffer As Long) As Long

Public Function GetShortPath(strFileName As String) As String

Dim lngRes As Long, strPath As String

strPath = String$(165, 0)

lngRes = GetShortPathName(strFileName, strPath, 164)

GetShortPath = Left$(strPath, lngRes)

End Function<p>sto form load :

Private Sub Form_Load()

MsgBox GetShortPath("c:\Program Files\")

End Sub<p>alli fora tha prepi na psaxno perissotero..anyway posted gia aftous pou asxoloude me vb ..