سوال: dataenvironemt [بایگانی]

84638463

سه شنبه 21 دی 1389, 15:37 عصر

سلام (با عرض پوزش)خیلی مطالب در این مورد را در سایت خوندم ولی متوجه نشدم
سئوالم در رابطه با گزارش گیری با enviroment است.
می خواهم فیلد های مساوی با محتوای text1را نمایش دهم
در accessاین query را به شکل زیر می نوشتم جواب می داد:
select * from table1 where =forms!form1.text1
ولی در vbدر قسمت dataenviroment1.connection1.command1
نمی توانم این را بنویسم
می خواستم در commanbuttomفرم هم بنویسم نگارش دستور را نمی دانستم .
از اساتید سایت در خواست کمک را دارم
با تشکر
8463:افسرده:

vbhamed

سه شنبه 21 دی 1389, 15:43 عصر

سلام

كدوم فيلدها ؟

84638463

سه شنبه 21 دی 1389, 20:50 عصر

با تشکر از عنایتتان
نمونه فایل access را برایتان می گذارم میخواهم همین کاررا در VBو با استفاده از enviroment انجام دهم.
(لطفا form1 را اجرا کنید )

در سئوال قبل منظور فیلد name بود
اگر نیاز هست برنامه VB را هم بفرستم

ali190

سه شنبه 21 دی 1389, 21:26 عصر

سلام
فايل اكسستون رو مورد بررسي قرار دادم
شما در اين فايل يك كوئري رو با استفاده از يك text پارامتريكش كردين
ميشه ارتباط اين قضيه رو با report (يا dataenvironemt ) بگيد؟
در ضمن خواهشاً براي اينكه زودتر به جوابتون برسيد فايل هاي Vb رو هم بذاريد
ممنون
ياعلي

84638463

چهارشنبه 22 دی 1389, 12:21 عصر

64928با سلام
میخواستم همین کار را با VB انجام دهم.
برنامه کار نمیکنه .
بازهم از شما ممنونم که کمکم می کنید

torshizi

شنبه 14 اسفند 1389, 07:50 صبح

سلام (با عرض پوزش)خیلی مطالب در این مورد را در سایت خوندم ولی متوجه نشدم
سئوالم در رابطه با گزارش گیری با enviroment است.
می خواهم فیلد های مساوی با محتوای text1را نمایش دهم
در accessاین query را به شکل زیر می نوشتم جواب می داد:
select * from table1 where =forms!form1.text1
ولی در vbدر قسمت dataenviroment1.connection1.command1
نمی توانم این را بنویسم
می خواستم در commanbuttomفرم هم بنویسم نگارش دستور را نمی دانستم .
از اساتید سایت در خواست کمک را دارم
با تشکر
8463:افسرده:

ابتدا بانک را باید ببندید وسپس این دستور را بدهیدdataenvironment.rscommand1.Source = "SELECT tabel1.cod, tabel1.name FROM tabel1 WHERE (tabel1.cod = '" + Text1.Text + "')"سپس بانک را باز میکنید این دستور and و or هم میشود داد مانندdataenvironment.rscommand1.Source = "SELECT per.cod, per.name, per.family, works.work, works.bimh, works.mor, works.month, works.sal FROM per INNER JOIN works ON per.cod=works.cod WHERE (((per.cod)=120) AND ((works.month)='ãåÑ') AND ((works.sal)=89))"