View Full Version : بدست آوردن آدرس دسکتاپ در vb6
goshveg
شنبه 01 آبان 1389, 10:43 صبح
بدست آوردن آدرس دسکتاپ در vb6
saeedvir
شنبه 01 آبان 1389, 15:52 عصر
بفرما
Dim HomeDir As String
Dim DesktopPath As String
HomeDir = Environ("windir")
DesktopPath = Left(HomeDir, 3) & "Documents and Settings\" & Environ("username") & "\Desktop"
MsgBox DesktopPath
براي win7 يا vista بايد خودتون سورس را يكم تغيير بديد:لبخند:
xxxxx_xxxxx
شنبه 01 آبان 1389, 18:48 عصر
سلام،
MsgBox Environ("UserProfile") & "\Desktop"
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.