السلام عليكم
اخوان هذه ادوت مساعدة اهديها لكم بمناسبة العيد على بساطتها , و كل عام و انتم بخير :
الاداة الاولى : تسجل برنامجك في ال startup و تتميز بسهولتها و استعمالها كالتالي.. اضف الاداة الى برنامجك add reference ثم عرف متغيير كالتالي
dim a as new registry.startup
a.setme("any value you want",fullFilePath)الاداة الثانية : و هي تتاكد من الاتصال بالانترنت واستعمالها كالتالي .. تضيف الاداة كسابقتها ثم تعرف متغيير كالتالي :
Dim a As New CheckNet.CheckInternetConnection()
ثم اذا اردت ان تتاكد من اتصالك بالانترنت اكتب التالي :
if a.check then msgbox "connected" else msgbox "not connected" end if
