السلام عليكم ورحمة الله وبركاته
انا بعمل برنامج لدكتور اطفال
وخلاص خصت البرنامج بفضل الله اولا وبعد مساعدة الاخوان
بس فاضل حاجة واحدة متعطل عليها
اني عاوز اضيف زر يفتح فورم فيها صورة بكامل حجمها مع كل مريض
يعني عاوز المستخدم اول ماييضيف مريض جديد او يعدل بيانات مريض من الازرار اللي انا حطتها في المشروع يضيف معاها صورة هو يحددها
واللي عندو طريقة احسن مايبخلش
للعلم انا لسة مبتدئ
تقبلو تحياتي وبارك الله فيكم مقدمآ
صورة المشروع في المرفقات
ايه يا اخوان مافيش حل يعني
(26-01-16, 10:41 PM)semsem.vb كتب : [ -> ]السلام عليكم ورحمة الله وبركاته
انا بعمل برنامج لدكتور اطفال
وخلاص خصت البرنامج بفضل الله اولا وبعد مساعدة الاخوان
بس فاضل حاجة واحدة متعطل عليها
اني عاوز اضيف زر يفتح فورم فيها صورة بكامل حجمها مع كل مريض
يعني عاوز المستخدم اول ماييضيف مريض جديد او يعدل بيانات مريض من الازرار اللي انا حطتها في المشروع يضيف معاها صورة هو يحددها
واللي عندو طريقة احسن مايبخلش
للعلم انا لسة مبتدئ
تقبلو تحياتي وبارك الله فيكم مقدمآ
صورة المشروع في المرفقات
السلام عليكم ورحمة الله وبركاته
اعمل مجلد بأسم pictures مثلاً داخل مجلد debug
واظف عمودين لقاعدة البيانات واحد بأسم patientt_picture مثلاً وعمود اخر بأسم picture_name
وضع هذا الكود اولاً في فورم الاظافة
PHP كود :
'تعريف مسار النسخ
Public pathcopy As String
'تعريف اسم الصورة
Public picname As String
'تعريف مسار اللصق
Public pathpaste As String
''جملة تحديد مسار الصورة
Public Sub picpath()
OpenFileDialog1.Filter = "jpg|*.jpg"
OpenFileDialog1.ShowDialog()
pathcopy = OpenFileDialog1.FileName
Dim picname = System.IO.Path.GetFileName(OpenFileDialog1.FileName)
pathpaste = Application.StartupPath & "\pictures\" & picname
End Sub
وضع هذا الكود في الحدث كليك في زر اظافة صورة المريض
PHP كود :
picpath()
Try
My.Computer.FileSystem.CopyFile(pathcopy, pathpaste)
picname = System.IO.Path.GetFileName(OpenFileDialog1.FileName)
pathpaste = Application.StartupPath & "\pictures\" & picname
PictureBox1.Load(OpenFileDialog1.FileName)
Catch
MsgBox("الصورة التي تم اخيارها موجودة مسبقاً")
End Try
End Sub
(27-01-16, 03:13 AM)moftah70 كتب : [ -> ] (26-01-16, 10:41 PM)semsem.vb كتب : [ -> ]السلام عليكم ورحمة الله وبركاته
انا بعمل برنامج لدكتور اطفال
وخلاص خصت البرنامج بفضل الله اولا وبعد مساعدة الاخوان
بس فاضل حاجة واحدة متعطل عليها
اني عاوز اضيف زر يفتح فورم فيها صورة بكامل حجمها مع كل مريض
يعني عاوز المستخدم اول ماييضيف مريض جديد او يعدل بيانات مريض من الازرار اللي انا حطتها في المشروع يضيف معاها صورة هو يحددها
واللي عندو طريقة احسن مايبخلش
للعلم انا لسة مبتدئ
تقبلو تحياتي وبارك الله فيكم مقدمآ
صورة المشروع في المرفقات
السلام عليكم ورحمة الله وبركاته
اعمل مجلد بأسم pictures مثلاً داخل مجلد debug
واظف عمودين لقاعدة البيانات واحد بأسم patientt_picture مثلاً وعمود اخر بأسم picture_name
وضع هذا الكود اولاً في فورم الاظافة
PHP كود :
'تعريف مسار النسخ
Public pathcopy As String
'تعريف اسم الصورة
Public picname As String
'تعريف مسار اللصق
Public pathpaste As String
''جملة تحديد مسار الصورة
Public Sub picpath()
OpenFileDialog1.Filter = "jpg|*.jpg"
OpenFileDialog1.ShowDialog()
pathcopy = OpenFileDialog1.FileName
Dim picname = System.IO.Path.GetFileName(OpenFileDialog1.FileName)
pathpaste = Application.StartupPath & "\pictures\" & picname
End Sub
وضع هذا الكود في الحدث كليك في زر اظافة صورة المريض
PHP كود :
picpath()
Try
My.Computer.FileSystem.CopyFile(pathcopy, pathpaste)
picname = System.IO.Path.GetFileName(OpenFileDialog1.FileName)
pathpaste = Application.StartupPath & "\pictures\" & picname
PictureBox1.Load(OpenFileDialog1.FileName)
Catch
MsgBox("الصورة التي تم اخيارها موجودة مسبقاً")
End Try
End Sub
بارك الله فيك ياغالي واجعله في ميزان حسناتك
(27-01-16, 01:13 PM)mohamed haroon كتب : [ -> ]تفضل اخى هنا كل شئ عن ادخال الصور الى قاعدة بيانات access شرح بالفيديو
https://www.youtube.com/playlist?list=PL...HhM6bFb5yw
تسلم اخي مشكور