يقوم ASP بتنفيذ تطبيق إدخال بيانات الدُفعات

يستخدم إدخال الدُفعات على نطاق واسع في قواعد البيانات ، وهناك العديد من الطرق لإدخال الدُفعات. بعد ذلك ، سأتحدث عن كيفية تحقيقه بناءً على طلبي الفعلي. الاستخدام الرئيسي هو مفهوم جمع النماذج ، والذي يأخذ جميع البيانات في المجموعة من خلال الحلقة. بالنظر إلى أنه من المريح للجميع رؤيته ، قمت بدمجها في صفحة واحدة.

هنا هو الرمز المحدد:

batchinput.asp

<٪

'#####################################################################

'filefunction: بيانات إدخال الدُفعات

المؤلف: ميون

التاريخ: 2003-8-19

'#####################################################################

اكتب البيانات إلى قاعدة البيانات

subwritedata ()

Dimreccnt ، أنا

DimfieldName1 ، FieldName2 ، FieldName3

Dimconn

DimSqlstr ، connstr

connstr = "provider = sqloledb.1 ؛ initialCatalog = myDatabase ؛ dataSource = myhon ؛ userId = sa ؛ password ="

setConn = server.createObject ("adodb.connection")

conn.openconnstr 'إنشاء اتصال قاعدة البيانات

reccnt = request.form ("stu_num"). عد 'كم عدد السجلات الموجودة في المجموع؟

بيانات إدخال الدُفعات

fori = 1toreccnt

FieldName1 = trim (request.form ("fieldname1") (i))

FieldName2 = trim (request.form ("fieldname2") (i))

FieldName3 = trim (request.form ("fieldname3") (i))

SQLSTR = "insertIntomytable (FieldName1 ، FieldName2 ، FieldName3) قيم ('"

sqlstr = sqlstr & fieldname1 و "'،' '

sqlstr = sqlstr & fieldname2 و "'،'"

sqlstr = sqlstr & fieldname3 و "')"

'Response.writesqlstr

conn.execute (SQLSTR)

التالي

ينتهي

عرض واجهة إدخال الدُفعات

subinputdata ()

Dimreccnt ، أنا

٪>

<PormName = "BathInputData" Action = "" method = "post">

<٪

reccnt = cint (request.form ("reccnt"))

fori = 1toreccnt

٪>

<inputType = "text" name = "fieldName1">

<inputType = "text" name = "fieldName2">

<inputType = "text" name = "fieldName3">

<٪

التالي

٪>

<br>

<pecttype = "إرسال" name = "الإجراء" value = "submit">

</form>

<٪

ينتهي

حدد عدد السجلات التي سيتم إدخالها على دفعات

subassignhowmuch ()

٪>

<! ------ حدد عدد السجلات التي يجب إدخالها ------------------------->

<formName = "form1" Action = "" method = "post">

عدد السجلات التي تريد إدخالها: <inputType = "text" name = "reccnt">

<pecttype = "إرسال" name = "الإجراء" value = "Next >>">

</form>

<٪

ينتهي

ifrequest.form ("Action") = "Next >>" ثم