11-09-19, 03:35 AM
السلام عليكم
لدي مشروع لادخال البيانات حيث يتم تحويلها الى باركود ويتم عرضها في picturbox
ومن ثم اقوم بنقل كل المعلومات الى قاعدة البيانات الا الصورة
وأقوم بقل المعلومات الى نموذ لملف نصي وورد قمت بعمل قالب له لذلك
المشكلة أنني اود نقل الصورة التي تظهر لي في picturbox الى مكانها في وورد دون اللجوء الى حفظها خارج او داخل قاعدة البيانات , لان البرنامج يقوم تلقائيا بتحويل الكود الى باركود اذا لايهمني الحفظ بل يهمني نقل الصورة الى وورد فقط
مع العلم أنني أستخدم bookmark لنقل البيانات
هذا مثال لطريقة النقل
لدي مشروع لادخال البيانات حيث يتم تحويلها الى باركود ويتم عرضها في picturbox
ومن ثم اقوم بنقل كل المعلومات الى قاعدة البيانات الا الصورة
وأقوم بقل المعلومات الى نموذ لملف نصي وورد قمت بعمل قالب له لذلك
المشكلة أنني اود نقل الصورة التي تظهر لي في picturbox الى مكانها في وورد دون اللجوء الى حفظها خارج او داخل قاعدة البيانات , لان البرنامج يقوم تلقائيا بتحويل الكود الى باركود اذا لايهمني الحفظ بل يهمني نقل الصورة الى وورد فقط
مع العلم أنني أستخدم bookmark لنقل البيانات
كود :
curDoc = New Word.Application
Dim dox As New Document
'Dim curDoc = New Word.Application
dox = curDoc.Documents.Open(My.Application.Info.DirectoryPath & "\اقتناء طابع\" & TextBox1.Text & ".docx")
Dim bk As Bookmarks = dox.Bookmarks
'ProgressBar1.Value = 10
bk("date").Range.Text = dt.Rows(pos).Item(4)
bk("dateE").Range.Text = dt.Rows(pos).Item(4)
' bk("ref").Range.Text = dt.Rows(pos).Item(2)
bk("timbre").Range.Text = dt.Rows(pos).Item(5)
bk("name").Range.Text = dt.Rows(pos).Item(1)
bk("pic").Range.Text =