FileExist("<System>javacpl.cpl","x")
FileExist("<System>java.exe","y")
If (x = 1 | y = 1) Then
Stry$='Java is installed on this computer'
MessageEx("Java","Stry$")
Else
Strn$='Java is not installed on this computer'
MessageEx("Java","Strn$")
End
یه کدی شبیه به این رو وارد کنی درست میشه