Aradığınız içerik sitemizde mevcut durumdadır
buradan sitemize dönebilirsiniz !
Forum Başlıklarına gitmek için tıklayınız
Dll ve Ocx Registere Kayıt
’dirlistBox
’drivelistBox
’FilelistBox
’iki adet Buton
’Kodları Yağıştırın dll ve ocx lerin yolunu gösterin kaydetsin
Private Sub Command1_Click()
For i = 0 To File1.ListCount - 1
Shell "Regsvr32 /s " & Dir1.Path & "\" & File1.List(i)
Next i
MsgBox "Ok"
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Hosting Sponsorumuz - Noktahost internet hizmetleri