• Home
 · 
• Windows System Services
 · 
• Perform Show Disktop operation from ur VB from This demo is created by Nirmal singh of Village Bala

Perform Show Disktop operation from ur VB from This demo is created by Nirmal singh of Village Bala

Perform Show Disktop operation from ur VB from This demo is created by Nirmal singh of Village Balanwali Distt. Bathinda (Punjab)

API Declarations


'if u like this please email me at [email protected]
Dim fsys As New FileSystemObject
Dim W As WshShell



Rate Perform Show Disktop operation from ur VB from This demo is created by Nirmal singh of Village Bala

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub Command1_Click()
On Error Resume Next
Dim s As String
s = "C:\nirmal.scf"
fsys.DeleteFile s, True
End
End Sub

Private Sub Command2_Click()
Set W = CreateObject("WScript.Shell")
W.Run "C:\nirmal.scf"
End Sub

Private Sub Form_Load()
On Error Resume Next
Me.Show
DoEvents
Dim texts As TextStream
Set texts = fsys.CreateTextFile("C:\nirmal.scf")
texts.WriteLine "[Shell]"
texts.WriteLine "Command = 2"
texts.WriteLine "IconFile=explorer.exe,3"
texts.WriteLine "[Taskbar]"
texts.WriteLine "Command=ToggleDesktop"
End Sub