تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
أريد ان انفذ امر عن طريق SSH لجهاز اندرويد عن طريق VB.NET
#1
السلام عليكم جميعا

أود أن أقوم بتنفيذ أمر reboot لجهاز اندرويد او لينكس عن طريق مكتبة SSHNET و قمت بكتابة هذا الكود:


كود :
       Dim connInfo As New Renci.SshNet.PasswordConnectionInfo("192.168.1.1", 22, "root", "password.")
       Dim sshClient As New Renci.SshNet.SshClient(connInfo)


       Dim cmd As Renci.SshNet.SshCommand


       sshClient.Connect()

       cmd = sshClient.CreateCommand("reboot
")
       cmd.Execute()
       sshClient.Disconnect()


لكن الكوماند يتوقف عن\ cmd.Execute و واجهة البرنامج بتعلق و لما اعمل pause for debugging ألاحظ ان الكود يتوقف عن cmd.execute و لا يكمل و ينهي الاتصال؟ أين المشكلة؟ سمعت انه هذه المكتبة لا تعمل بشكل مناسب Renci SSHNET ؟ هل يوجد حل لهذه المشكلة و شكرا لكم جميعا
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

يفضل ارفاق مثال من المشروع
حتى يتم اختبار المكتبة التى تستخدمها ما دور كل كود
وما المطلوب بكل قيمة حتى يتم افادتك كيفية استخدام الكود بصورة صحيحة

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: mohammadsaeed01 , عبد العزيز البسكري
#3
شكرا دزيلا على الرد 
نعم هذا كود البرنامج البسيط الذي أختبره. الكود بيعمل SSH SESSION الى الموبايل لكن التطبيق بعلق و لما اعمل PAUSE  بشوف انه وقف عن CMD=SSHCLIENT.RUNCOMMAND  بدون أن ينفذ الامر و جربته على لينكس أيضا نفس المشكلة

كود :
Imports System.Text.RegularExpressions
Imports System.Net.Sockets
Imports Renci.SshNet
Imports System
Imports Renci.SshNet.Common
Imports Renci.SshNet.Messages.Connection
Imports Renci.SshNet.Messages.Transport
Imports System.IO
Imports System.ComponentModel

Public Class Form1



   Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click

       Dim connInfo As New Renci.SshNet.PasswordConnectionInfo("192.168.1.1", 22, "root", "paswword")
       Dim sshClient As New Renci.SshNet.SshClient(connInfo)

       Dim cmd As Renci.SshNet.SshCommand

        
        
       sshClient.Connect()
       cmd = sshClient.RunCommand("reboot")
       sshClient.Disconnect()



   End Sub


End Class
هذا رابط المكتبة اللي استعملها: Renci SSHNET
الرد }}}
تم الشكر بواسطة:
#4
الشكر لله والحمد لله
والحمد لله على كل حال

فى البداية بخصوص كود الاتصال

بناءاً على رابط فهو يحتوى على كود طريقة الاتصال وهو
كود :
       Dim ConnInfo As ConnectionInfo = New ConnectionInfo("sftp.foo.com", "guest", New PasswordAuthenticationMethod("guest", "pwd"), New PrivateKeyAuthenticationMethod("rsa.key"))
       Using client As SftpClient = New SftpClient(ConnInfo)
           client.Connect()
       End Using

هذا الكود Vb.Net بعد تحويله من C#
ثانياً بخصوص هذا السطر
كود :
sshClient.RunCommand("reboot")

لا اعلم اذا كان الامر يفترض ان يكتب فى RunCommand أم انه يكتب فى WriteLine
انا حتى الان لم اعمل على المكتبة والاطلاع عليها ولعل بنهاية اليوم اذا كنت متفرغ ساقوم بذلك

ولكن حتى هذا الامر يفضل مراجعة هذا الفيديو فهو يخص هذا الادا على Vb.Net

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: mohammadsaeed01 , عبد العزيز البسكري
#5
(20-04-19, 10:25 AM)elgokr كتب :
الشكر لله والحمد لله
والحمد لله على كل حال

فى البداية بخصوص كود الاتصال

بناءاً على رابط فهو يحتوى على كود طريقة الاتصال وهو
كود :
       Dim ConnInfo As ConnectionInfo = New ConnectionInfo("sftp.foo.com", "guest", New PasswordAuthenticationMethod("guest", "pwd"), New PrivateKeyAuthenticationMethod("rsa.key"))
       Using client As SftpClient = New SftpClient(ConnInfo)
           client.Connect()
       End Using

هذا الكود Vb.Net بعد تحويله من C#
ثانياً بخصوص هذا السطر
كود :
sshClient.RunCommand("reboot")

لا اعلم اذا كان الامر يفترض ان يكتب فى RunCommand أم انه يكتب فى WriteLine
انا حتى الان لم اعمل على المكتبة والاطلاع عليها ولعل بنهاية اليوم اذا كنت متفرغ ساقوم بذلك

ولكن حتى هذا الامر يفضل مراجعة هذا الفيديو فهو يخص هذا الادا على Vb.Net

تحياتى لك
وتمنياتى لك التوفيق

تسلم أخي بارك الله فيك و ربنا يزيدك من فضله...نعم المفروض الامر يكون على مستوى WriteLine و الفيديو استفدت منه ربنا يباركلك
الرد }}}
تم الشكر بواسطة: elgokr , elgokr
#6
لى ولك وللجميع بامر الله

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  التحقق من خلال محتوى خلية عن طريق textbox صالح عبدالله 2 222 24-01-24, 12:54 PM
آخر رد: صالح عبدالله
  تشغيل الماكرو عن طريق اكواد الفجوال نيمو 0 271 03-11-23, 11:14 AM
آخر رد: نيمو
  اريد ارسال pdf عبر واتساب عن طريق ال API محتاج تعديل على الكود moh61 0 517 03-08-23, 03:41 PM
آخر رد: moh61
  أريد كود لغلق جميع النوافذ عند تسجيل الخروج Emam emam 2 502 10-07-23, 02:12 AM
آخر رد: Emam emam
  [سؤال] تشغيل راديو عن طريق الانترنت أبوسعود 5 716 01-07-23, 10:34 PM
آخر رد: asmarsou
  [VB.NET] اريد كود البحث او الفلترة عن طريق تيكست بوكس و عرض النتيجة في داتا جريد فيو الحسين احمد 6 10,620 10-06-23, 01:01 PM
آخر رد: mahmoud mostafa 2023
  ربط جهازين عن طريق الانترنت (public ip) mom22jo 5 1,967 15-05-23, 12:25 AM
آخر رد: ابو محمد محمد محمد
  فتح قاعدة البيانات المحمية بكلمة مرور عن طريق الفيجوال بيسك Tajaldeen 1 658 07-03-23, 08:59 AM
آخر رد: Taha Okla
  كيفية تحديد طابعه معينه للطباعه عن طريق PrintDocument حسين ادريس 2 595 14-02-23, 11:16 PM
آخر رد: estefsar

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم