منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كيفية حفظ ملف التسجيل الصوتي الي رابط مباشر - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كيفية حفظ ملف التسجيل الصوتي الي رابط مباشر (/showthread.php?tid=24408)



كيفية حفظ ملف التسجيل الصوتي الي رابط مباشر - e-coder - 03-04-18

سلام عليكم
بعد الصلاه على سيدنا محمد

اريد من الاخوة 
طريقة لتحويل الملف الصوتي 
في المشروع المرفق
الي رابط مباشر
http://cdn.chatp.net/chat/-love-/audios/2018-04-02/1522690282690.3gp

هكذا

مشروع في المفرقات



RE: كيفية حفظ ملف التسجيل الصوتي الي رابط مباشر - عبدالله الدوسري - 03-04-18

بعد حفظ الملف على القرص الصلب , قم برفع الملف على الإنترنت 
لا توجد طريقة أخرى


هناك طريق كثيرة لرفع الملفات :
منها : الموقع على الإنترنت لا يطلب تصاريح 
كود :
My.Computer.Network.UploadFile(Filez, "http://xxx.xxx.xxx/aaa/bbb/filename.wav")



بعض المواقع تحتاج إلى اسم مستخدم وكلمة مرور :
كود :
My.Computer.Network.UploadFile(Filez, "http://xxx.xxx.xxx/aaa/bbb/filename.wav", "UserName", "Password")



عن طريق خادم FTP
كود :
       ' set up request...
       Dim clsRequest As System.Net.FtpWebRequest =
           DirectCast(System.Net.WebRequest.Create("ftp://ftp.xxx.xxx/bbb/filename.wav"), System.Net.FtpWebRequest)
       clsRequest.Credentials = New System.Net.NetworkCredential("myusername", "mypassword")
       clsRequest.Method = System.Net.WebRequestMethods.Ftp.UploadFile

       ' read in file...
       Dim bFile() As Byte = System.IO.File.ReadAllBytes(Filez)

       ' upload file...
       Dim clsStream As System.IO.Stream =
           clsRequest.GetRequestStream()
       clsStream.Write(bFile, 0, bFile.Length)
       clsStream.Close()
       clsStream.Dispose()



RE: كيفية حفظ ملف التسجيل الصوتي الي رابط مباشر - e-coder - 04-04-18

(03-04-18, 03:24 PM)عبدالله الدوسري كتب : بعد حفظ الملف على القرص الصلب , قم برفع الملف على الإنترنت 
لا توجد طريقة أخرى


هناك طريق كثيرة لرفع الملفات :
منها : الموقع على الإنترنت لا يطلب تصاريح 
كود :
My.Computer.Network.UploadFile(Filez, "http://xxx.xxx.xxx/aaa/bbb/filename.wav")



بعض المواقع تحتاج إلى اسم مستخدم وكلمة مرور :
كود :
My.Computer.Network.UploadFile(Filez, "http://xxx.xxx.xxx/aaa/bbb/filename.wav", "UserName", "Password")



عن طريق خادم FTP
كود :
       ' set up request...
       Dim clsRequest As System.Net.FtpWebRequest =
           DirectCast(System.Net.WebRequest.Create("ftp://ftp.xxx.xxx/bbb/filename.wav"), System.Net.FtpWebRequest)
       clsRequest.Credentials = New System.Net.NetworkCredential("myusername", "mypassword")
       clsRequest.Method = System.Net.WebRequestMethods.Ftp.UploadFile

       ' read in file...
       Dim bFile() As Byte = System.IO.File.ReadAllBytes(Filez)

       ' upload file...
       Dim clsStream As System.IO.Stream =
           clsRequest.GetRequestStream()
       clsStream.Write(bFile, 0, bFile.Length)
       clsStream.Close()
       clsStream.Dispose()

 اخي في المثال الاول بعد رفع الملف
 في هذا المثال
My.Computer.Network.UploadFile(Filez, "http://xxx.xxx.xxx/aaa/bbb/filename.wav")

كيف استخدم الملف المرفوع في هذ الكود
PHP كود :
 <message xmlns="jabber:client" from="القدس@conference.nimbuzz.com/dabor" type="groupchat" to="kfn_3mad@s.chatp.net/eyeCU" id="0mJyp-438">
 
   <body xmlns="jabber:client"/>
 
   <c xmlns="u:x:room_image">
 
     <url xmlns="u:x:room_image">http://xxx.xxx.xxx/aaa/bbb/filename.wav</url>
 
   </c>
 
 </message
اخي لقد اضفت بالبرفقات برنامج م ن برمجتي لرفع الصور ولكن اريد تحويل الاكواد
لرفع رابط مباشر ولكن لصوت المسجل اعلاه


RE: كيفية حفظ ملف التسجيل الصوتي الي رابط مباشر - e-coder - 06-04-18

ما الحل ؟؟؟