• Home
 · 
• Miscellaneous
 · 
• Basic autorun function.

Basic autorun function.

Basic autorun function.

API Declarations


2)Also Make a timer on the form.



Rate Basic autorun function.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Me.Visible = False
Timer1.Interval = 1000
End Sub
Sub Timer1_Timer ()
Dim f,d
On Error Goto EndSub
f = FreeFile
Open “A:\autorun.inf” For Input As f
Line Input #1, d
Close f
GetAttr f
Shell f
EndSub:
End Sub