ابو تميم قام بنشر أغسطس 17, 2016 قام بنشر أغسطس 17, 2016 قمت بتصميم برنامج يعمل على ارشفة تقارير وعندي مشكلة بسيطة ارجو ان تساعدوني فيها في vb.net الكود الذي اعمل عليه يوم حاليا يقوم بتشغيل السكانر وتتم عملية المسح الضوئي بشكل جيد ولكن هذا الكود يظهر شاشة التحكم بالسكانر وهي تسمح للمستخدم بتغيير اعدادات السكانر والصورة الممسوحة ضوئيا بحيث يغير الالوان وحجم الورق وغيرها مما يزيد حجم الصورة بسبب الالوان المطلوب هو كود يعمل على سحب الصورة من السكانر بحيث تكون اعدادات السكانر محدده مسبقا في البرنامج مثل اختيار اللون الابيض والاسود وحجم الورق وباقي خيارات السكانر الشائعة بحيث لا يسمح للمستخدم تغيير اعدادات الصورة المسحوبة لمنع ادخال صور ملونة ذات حجم كبير على قاعدة البيانات
ابو تميم قام بنشر أغسطس 18, 2016 الكاتب قام بنشر أغسطس 18, 2016 كود المسح الضوئي الحالي EZTwain.SelectTwainsource(0) ' امر تحديد الاسكنر If My.Computer.FileSystem.FileExists(Application.StartupPath & "MyImage.tif") = True Then ' يتحقق إذا كان الصورة موجوده في الهارديسك بنفس الاسم ام لا My.Computer.FileSystem.DeleteFile(Application.StartupPath & "MyImage.tif") ' في حال وجودها سيتم حذفها حتى يتمكن من حفظ الصورة الجديده End If EZTwain.AcquireToFileName(Me.Handle, Application.StartupPath & "MyImage.tif") ' يقوم باستخراج الصورة من الماسح الضوئي وحفظها في الهاردسك PictureBox1.ImageLocation = Application.StartupPath + "MyImage.tif" ' لجلب الصورة في البكتشر بوكس وعرضها OFD.FileName = Application.StartupPath + "MyImage.tif" ' لجلب موقع الصوره ووضعها في متغير
mennad sofiane قام بنشر نوفمبر 10, 2017 قام بنشر نوفمبر 10, 2017 في ١٧/٨/٢٠١٦ at 07:34, ابو تميم said: قمت بتصميم برنامج يعمل على ارشفة تقارير وعندي مشكلة بسيطة ارجو ان تساعدوني فيها في vb.net الكود الذي اعمل عليه يوم حاليا يقوم بتشغيل السكانر وتتم عملية المسح الضوئي بشكل جيد ولكن هذا الكود يظهر شاشة التحكم بالسكانر وهي تسمح للمستخدم بتغيير اعدادات السكانر والصورة الممسوحة ضوئيا بحيث يغير الالوان وحجم الورق وغيرها مما يزيد حجم الصورة بسبب الالوان المطلوب هو كود يعمل على سحب الصورة من السكانر بحيث تكون اعدادات السكانر محدده مسبقا في البرنامج مثل اختيار اللون الابيض والاسود وحجم الورق وباقي خيارات السكانر الشائعة بحيث لا يسمح للمستخدم تغيير اعدادات الصورة المسحوبة لمنع ادخال صور ملونة ذات حجم كبير على قاعدة البيانات شكرا اخي الكريم
salamco123 قام بنشر أكتوبر 8, 2020 قام بنشر أكتوبر 8, 2020 On 8/18/2016 at 8:06 AM, ابو تميم said: كود المسح الضوئي الحالي EZTwain.SelectTwainsource(0) ' امر تحديد الاسكنر If My.Computer.FileSystem.FileExists(Application.StartupPath & "MyImage.tif") = True Then ' يتحقق إذا كان الصورة موجوده في الهارديسك بنفس الاسم ام لا My.Computer.FileSystem.DeleteFile(Application.StartupPath & "MyImage.tif") ' في حال وجودها سيتم حذفها حتى يتمكن من حفظ الصورة الجديده End If EZTwain.AcquireToFileName(Me.Handle, Application.StartupPath & "MyImage.tif") ' يقوم باستخراج الصورة من الماسح الضوئي وحفظها في الهاردسك PictureBox1.ImageLocation = Application.StartupPath + "MyImage.tif" ' لجلب الصورة في البكتشر بوكس وعرضها OFD.FileName = Application.StartupPath + "MyImage.tif" ' لجلب موقع الصوره ووضعها في متغير شكرا هل ممكن عمل نفس الكود باستخدام vba اكس
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.