الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أرجو المساعدة في DataEnvironment

مغلق
بدأه madre في 13 يوليو 2006 · 4 رد · 823 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

عملت برنامج

ومن داخل البرنامج يتم إنشاء جداول بأرقام الطلاب عند إضافة بياناتهم

والآن أريد عمل زر (معاينة لتقرير عملته بواسطة Datareport )

بحيث يغير لي خاصية commandtext للأمر command1 الموجود في DataEnvironment1

حاولت بالتالي لكن لم ينجح:

كود:

DataEnvironment1.rscommand1.Source = "select * from SnumText.text"

DataEnvironment1.rscommand1.Open

datareport1.Show

وجربت الكود التالي ولم ينجح:

كود:

DataEnvironment1.Commands.Item(command1).CommandText = "select * from Text1.text"

datareport1.Show

حيث أن:

Text1.text حقل رقم الطالب الذي يدخله المستخدم وأيضا اسم الجدول لأنه عند إنشاء بيانات للطالب يتم إنشاء جدول يكون اسمه يساوي رقم الطالب

أرجو المساعدة

أرجو المساعدة

أرجو المساعدة

أنا قمت بتحديد مصدر البيانات يدويا..... للتقرير وللأمر

وأعتقد أن المشكلة هي في الكود الي كتبته أنا

هنا أرفق مثال مصغر للمشكلة

وأتمنى منكم المساعدة

أرجو تحميله والتعديل عليه مباشرة

وأرجو من الذي يستطيع المساعدة أن يساعد وله الدعاء والأجر

فأنا أعمل بهذا المشروع من أسبوعين

وتوقفت عند هذه المشكلة لمدة أسبوع وأنا أحاول حلها

ولكم خالص الشكر والتقدير

data.rar

#2

السلام عليكم

موجود بالمنتدى شرح لاستخدام الداتا ريبورت بدون DataEnvironment1 بقسم التقارير

ابحث عنها

460.gif

#3

جربت ملفاتك

تحتاج تعديل بسيط

امسح الكود التالي

DataEnvironment1.Commands.Item(command1).CommandText = "select * from Text1.text"

460.gif

#4

أشكرك كل الشكر يا أخي المتميز

اسم على مسمى

أنا لا أستفيد إ

أشكرك كل الشكر يا أخي المتميز

اسم على مسمى

أنا لا أستفيد إذا حذفت الكود

أنا أريد التعديل على الكود أو إستبداله بأفضل منه

باختصار أريد كود يمكنني من التحكم بقيمة الخاصية CommandText

للأمر الموجود في DataEnvironment

وذلك بشكل برمجي

وتقبل خالص الشكر والتقدير والله يجزاك كل خير

#5

إذا كنت تريد ان تدخل اسم الجدول في مربع النص وتبحث عنه اكتب

DataEnvironment1.Commands.Item(command1).CommandText = "select * from " & Text1.text &""

460.gif

هذا الموضوع مغلق.

مواضيع مشابهة