برنامج ASP التعليمي: بعض المعرفة الضرورية لكل مبرمج ASP

برنامج ASP التعليمي: بعض المعرفة الضرورية لكل مبرمج ASP

اتصال قاعدة البيانات:

وفيما يلي المحتوى المقتبس:

<%

تعيين conn=server.createobject(adodb.connection)

conn.open driver={برنامج تشغيل الوصول إلى Microsoft (*.mdb)};dbq=&server.mappath(اسم قاعدة البيانات)

%>

افتح قاعدة البيانات:

وفيما يلي المحتوى المقتبس:

exec=select * من جدول قاعدة البيانات

تعيين rs=server.createobject(adodb.recordset)

rs.open إكسيك، كون، 1،1

تتم قراءة المعلمة 1، 1

قراءة تنسيق المحتوى: <%=rs(field)%>

إضافة معالج السجل:

وفيما يلي المحتوى المقتبس:

<%

تعيين conn=server.createobject(adodb.connection)

conn.open driver={برنامج تشغيل الوصول إلى Microsoft (*.mdb)};dbq=&server.mappath(اسم قاعدة البيانات)

name=request.form (الحقل) الاسم والهاتف والرسالة هي قيم الحقول المحددة لإرسال النموذج

هاتف=request.form(حقل)

رسالة=request.form(حقل)

exec=insert في اسم الجدول (الحقل) قيم ('+field+') مضاعفات مفصولة بفواصل

يستخدم conn.execute exec التنفيذ للإرسال

conn. Close

تعيين كون = لا شيء

%>

معالج البحث:

وفيما يلي المحتوى المقتبس:

<%

name=request.form(field) name,tel هي قيم الحقل المعينة لإرسال النموذج

هاتف=request.form(حقل)

تعيين conn=server.createobject(adodb.connection)

conn.open driver={برنامج تشغيل الوصول إلى Microsoft (*.mdb)};dbq=&server.mappath(اسم قاعدة البيانات)

exec=select * من الجدول حيث الاسم='+field+' وtel=+field

تعيين rs=server.createobject(adodb.recordset)

rs.open إكسيك، كون، 1،1

%>

"قم بتصدير المحتوى الذي تم البحث عنه في الصفحة."

<%

تفعل في حين لا rs.eof

%><tr>

<td><%=rs(الاسم)%></td>

<td><%=rs(tel)%></td>

<td><%=rs(time)%></td>

</tr>

<%

rs.movenext

حلقة

%>

حذف معالج السجل:

وفيما يلي المحتوى المقتبس:

<%

تعيين conn=server.createobject(adodb.connection)

conn.open driver={برنامج تشغيل الوصول إلى Microsoft (*.mdb)};dbq=&server.mappath(اسم قاعدة البيانات)

exec=delete * من اسم الجدول حيث number=&request.form(id)

conn.execexe

%>

تعديل معالج السجل:

وفيما يلي المحتوى المقتبس:

<%

تعيين conn=server.createobject(adodb.connection)

conn.open driver={برنامج تشغيل الوصول إلى Microsoft (*.mdb)};dbq=&server.mappath(اسم قاعدة البيانات)

exec=select * من اسم الجدول حيث number=&request.form(id)

تعيين rs=server.createobject(adodb.recordset)

rs.open exec,conn,1,3 '1,3 هو تعديل المعنى

rs(name)=request.form(field) 'name,tel,message هي قيم الحقول المعينة لإرسال النموذج

rs(tel)=request.form(field)

rs(رسالة)=request.form(حقل)

rs.update

rs. Close

تعيين RS=لا شيء

conn. Close

تعيين كون = لا شيء

%>

تعديل برنامج تنفيذ السجل: صفحة رقم معرف الإدخال >>>>تصدير بيانات المعرف المقابلة >>>>>>معالج للتعديل المباشر

مثال لمعالج تسجيل الدخول في الخلفية:

وفيما يلي المحتوى المقتبس:

<%

اسم خافت، كلمة المرور

الاسم=request.form(الاسم)

كلمة المرور=request.form(كلمة المرور)

خافت إكسيك، كون، آر إس

exec=select *من اسم الجدول حيث (الاسم='&field&' وكلمة المرور='&field&')

تعيين conn=server.createobject(adodb.connection)

conn.open driver={برنامج تشغيل الوصول إلى Microsoft (*.mdb)};dbq=&server.mappath(اسم قاعدة البيانات)

تعيين rs=server.createobject(adodb.recordset)

rs.open إكسيك، كونيتيكت

إن لم يكن rs.eof ثم

روبية. إغلاق

conn.Close

الجلسة (محددة) = نعم

جلسة (فحص) = حق

Response.Redirect Index.asp

آخر

الجلسة (محددة) = لا

جلسة (فحص) = خطأ

استجابة. إعادة توجيه تسجيل الدخول.asp

نهاية إذا

%>

أضف إلى كل صفحة خلفية:

<%if not session(checked)=yes، ثم "حدد متغير سلسلة محددًا في الجلسة."

استجابة. إعادة توجيه تسجيل الدخول.asp

آخر

%>