Visual Basic 6 Yardımm

QAWZSE' Alıntı:

Arkadaşlar şimdi ben listboxuma programın açıldığı bilgisayarın belgelerim klasöründeki herhangi bi klasörü yansıtmak istiyorum fakat bunun için programın kod kısmına kendi bilgisayarımın ismini yazmam gerekiyor yani şöyle oluyor

örnek :

File1.Path = "C:\Users\bilgisayarın adı\Music"

bu kodu her bilgisayarda çalışacak şekilde nasıl ayarlarım yararlı yorumlara teşekkür

Genişletmek için tıkla ...

kardeş onu bilmiyorum ama youtubeden ekleyebilirsin Soundcloud adlı sitede mp3 yayını yapıyolar youtubede olan müziklerin nerdeyse hepsi var.orda embed kodlarını alıp programına ekleyebilirsin.

Private Declare Function ShellExecute _
Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long


Private Sub Form_Load()
Dim path As String
path = Environ("userprofile") & "\Klasöradı"
file1.path = path
ShellExecute Me.hwnd, "open", "", "", path, 1
end sub

C:\%userprofile%\music yazdıgın zaman sanırım otomatık olarak ayarlar