سلام و درود.
برای کار با asp کلاسیک و دیتابیس access تنظیماتی نیاز است که در زیر به آنها می پردازیم.
1. تعریف متغیر

کد:

کد:
dim strcon,con,rec


2. مقدار دهی متغیر strcon یا همان رشته ی اتصال
کد:

کد:
strcon="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+Server.MapPath("/")+"firstdbdata.mdb"


پارامترهای بالا رو تقریبا تمام دوستان باهاش آشنا هستند .
Data Source یا همان منبع داده میشه آدرس و نام دیتابیس امون.
Provider هم چون از Access استفاده می کنیم میشه Microsoft.Jet.OLEDB.4.0

3. ست کردن متغیرهای con و rec * و همچنین نسبت دادن رشته ی اتصال
کد:

کد:
 *set con=Server.CreateObject("adodb.connection")
 *set rec=Server.CreateObject("adodb.recordset")
 *con.ConnectionString=strcon
 *


4.در این مرحله کانکشن و رکورد ست رو open میکنیم.
کد:

کد:
 *con.Open
 *rec.Open "select * from Tlink",con,0,3


5.در این مرحله دیتابیس رو پیمایش کرده و مقادیر برابر با ابوالفضل رو چاپ می کنیم.
کد:

کد:
 rec.MoveFirst
 *if rec.EOF=true then 
 * *Response.Write("ديتابيس خالي است")
 *else
 * *stkey="name like "*"+Request.QueryString("ابوالفضل")+"*""
 * *rec.Find stkey
 * *if rec.eof=false then 
 * * * Response.Write(&quot;<b>name=</b>&quot;+rec.Fields(&quot;name&quot;).Value)
 * * * Response.Write(&quot;*********<b>id=</b>&quot;+rec.Fields(&quot;id&quot;).Value)
 * *else
 * * * Response.Write(&quot;ركورد مورد نظر يافت نشد&quot;) * 
 * *end if
 *end if *
 *

6.در این مرحله تمامی ارتباطات را بسته و برنامه پایان می یابد.

کد:

کد:
 con.Close
 *set con=nothing
 *set rec=nothing




فایل جامع برنامه رو* به همراه دیتابیس برای دانلود در [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید] گذاشتم.
[برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]