يؤدي هذا إلى إنشاء مثيل قاعدة بيانات، ولكن ما هو مثيل قاعدة البيانات؟ كما أن rs ليس متغيرًا، فكيف يقوم بتنفيذ عمليات مثل rs.update في البرنامج؟ مفتوح يعني كيفية تلقي البيانات من RS؟ هو إنشاء مجموعة بيانات
يجب تعريف مجموعة البيانات هذه أولاً
dimrs مثل adodb.recordset
ثم يمكنك استخدام
تعيين rs=server.CreateObject(adodb.recordset)
لإنشاء مثيل لمجموعة البيانات، بالطبع لا توجد بيانات في مجموعة البيانات في هذا الوقت
رس.فتح......
لفتح مجموعة السجلات
rs.append أو rs.insert لإضافة السجلات
rs.edit لتعديل السجلات
بالنسبة للسجلات المضافة أو المعدلة، يمكنك استخدام
rs.fields(اسم الحقل)=xxx
لتعيين
rs.update
تحديث القيم المتغيرة مرة أخرى إلى قاعدة البيانات
عند إضافة بيانات (rs1) إلى قاعدة البيانات:
rs.addnew
rs(rs1)=البيانات المضافة
rs.update
rs. Close
تعيين RS=لا شيء
لنأخذ مثالا أدناه:
تعيين mRs = Server.CreateObject (adodb.recordSet)
mRs.open حدد * من الكتاب، conn، 1، 3
mRs.addnew
mRs(الاسم) = الاسم
mRs(Mail) = Mail
السيد (Qq) = Qq
mRs(معلومات) = معلومات
مرس (الوقت) = الآن ()
mRs.update
mRs.إغلاق
تعيين mRs = لا شيء
// ما يلي هو استدعاء مربع إدخال html
انسخ رمز الكود كما يلي:
<حدود الجدول=0 cellpadding=0 style=border-collapse: طي العرض=100%>
<اسم النموذج=form1 الطريقة=post action=admin/<% =filename %>?action=Reply&id=<% =id %>>
<تر>
<td width=118 height=37 align=center bgcolor=#EFEFEF>الاسم المستعار:</td>
<عرض تد = 640>
<اسم الإدخال=نوع الاسم=فئة النص=قيمة الإدخال=<% =mRs(Name) %>>
</TD>
</tr>
<تر>
<td width=118 height=37 align=center bgcolor=#EFEFEF>هل المحتوى عام:</td>
<عرض تد = 640>
<نوع الإدخال=اسم الراديو=قيمة Qq=1 <%إذا mRs(qq)=1 ثم تم تحديد نهاية الاستجابة إذا%> >
نعم
<اسم الإدخال=نوع Qq=قيمة الراديو=0 <%if mRs(qq)=0 ثم تم تحديد نهاية الاستجابة إذا%> >
لا</td>
</tr>
<تر>
<td width=118 height=37 align=center bgcolor=#EFEFEF>البريد الإلكتروني:</td>
<عرض تد = 640>
<اسم الإدخال=نوع البريد=فئة النص=قيمة الإدخال=<% =mRs(Mail) %>>
</TD>
</tr>
<تر>
<td width=118 height=37 align=center bgcolor=#EFEFEF>الرسالة:</td>
<عرض تد = 640>
<اسم منطقة النص=صفوف المعلومات=9 أعمدة=57 فئة=زر><% =mRs(معلومات) %></textarea>
</TD>
</tr>
<تر>
<td height=25 align=center bgcolor=#EFEFEF width=118>الرد:</td>
<ارتفاع td=100rowspan=2 bgcolor=#EFEFEF width=640>
<اسم منطقة النص=صفوف الرد=6 أعمدة=50 فئة=زر><% =الرد %></textarea>
</TD>
</tr>
<تر>
<ارتفاع td=70 bgcolor=#عرض EFEFEF=118></td>
</tr>
<تر>
<ارتفاع td=20 colspan=2 محاذاة=مركز bgcolor=#EFEFEF>
<اسم الإدخال = نوع الإرسال 1 = معرف الإرسال = قيمة الإرسال = فئة رسالة الرد = زر>
<اسم الإدخال=نوع إعادة الضبط=معرف إعادة الضبط=قيمة reSet4=أعد إدخال الفئة=زر>
</TD>
</tr>
</النموذج>
</الجدول>