اتصال به بانک اکسس دارای پسورد

[mrezam]

سلام
چطوری میشه به یه بانک اکسس که پسورد روشه با دلفی وصل شد
البته*تو قسمت*connection string* پسورد هم دادم ولی درست نشد

[meyti]

روش ها مختلفه :
ولی اگه از connection string - build استفاده میکنید پس ورد رو در سربرگ آخر وارد کنید : مطابق عکس زیر

[admin]

رشته ی اتصال یا همون Connection String با کد نویسی میشه این :

کد:

Provider=Microsoft.ACE.OLEDB.12.0;Password=123;Data Source=db.mdb;Persist Security Info=True

فرض کردیم نام دیتابیس db.mdb باشه
user Name = admin
Password = 123

[mrezam]

دمتون گرم

[mrezam]

یه سوال دیگه* دستوری که یک کلمه مشخص رو تو چند تا ستون مختلف از دیتابیس*سرچ کنه و*رکوردهای مورد نظر رو تو یه دی بی گرید بریزه*

[admin]

کد:

select * from myTable
where id="87"

دستور بالا برای این استفاده میشه که دقیقا چند کاراکتر مشخص رو برگردونه و دستور زیر میتونه شبیه اش رو هم برگردونه
کد:

select * from myTable
where id like "%87%"

برای فرستادن به dbgrid هم لازمه که کد بالا رو با یک adoquery اجرا کرده و دیتاسورس dbgrid رو با این یکسان بگیرید

[mrezam]

منظورم دستوری که*کلمه ای*رو سرچ کنه که ممکنه* تو ستون
n5*یا n6*یا n7*
از هر رکوردی اومده باشه
یه چیزی شبیه کد زیر اگه درست باشه

کد:
کد:

select * from mytable where n4 like:"%word%" or n5 like:"%word%"or*

..*

[mrezam]

ضمن تشکر یه سوال دیگه هم داشتم*
دستوری که* تعداد نفراتی که یک مقدار را انتخاب کرده اند را برگردونه

[admin]

سلام.مثالی رو از یک پروژه براتون گذاشتم :
کد:

 *
 dm.ADOQuery1.SQL.Clear;
 dm.ADOQuery1.SQL.Add("select COUNT(infTypeKantiner) from tblInformation");
 dm.ADOQuery1.SQL.Add("where infTypeKantiner = 40 and
 infNumberKamion ="+QuotedStr(DBComboBox1.Text)
+"and infDate >= "+QuotedStr(MaskEdit1.Text) 
+&quot;and infDate <= &quot;+QuotedStr(MaskEdit2.Text));
 dm.ADOQuery1.Open;

[mrezam]

با تشکر مجدد
یه مقدار عددی محاسبه شده توی برنامه رو چطوری توی یه label نمایش بدم؟

[meyti]

با توجه به نوع عدد از دستورات زیر میشه استفاده کرد :

کد:

Label1.Caption:=IntToStr(n);
.
.
.
FloatToStr(n);

[mrezam]

با سلام
چطوری میشه عنوان یک فیلد از دیتابیس رو تو ی یک textریخت.

[meyti]

اگه منظور شما اسم فیلد یا عنوان نمایش یک فیلد هست از دستورات زیر کمک بگیرید :

کد:

Edit1.Text:=table1.Fields[1].DisplayName;
Edit2.Text:=table1.Fields[1].FieldName;