ظهرت فكرة اليوم عند معرفة اسم قاعدة البيانات فقط، استخدم asp للحصول على جميع أسماء الجداول وأسماء الحقول لجميع الجداول ومحتويات جميع الحقول في قاعدة البيانات. وبعد فترة من البحث عن المعلومات والتعديلات، قمت بها أخيرًا، والآن أشاركها معكم. انسخ رمز الكود كما يلي:
<%
'الوظيفة: عرض أسماء الجداول وأسماء الحقول ومحتويات الحقول في قاعدة البيانات
'الأصلي: وانجسدونج
'المقالة الأصلية، يرجى الاحتفاظ بهذه المعلومات لإعادة طبعها، شكرًا لك
تعيين rs=server.CreateObject(adodb.recordset)
db=db1.mdb
تعيين conn=server.CreateObject(adodb.connection)
connstr=Provider=Microsoft.Jet.OLEDB.4.0;مصدر البيانات= & Server.MapPath(db)
conn.open connstr
تعيين rs=Conn.OpenSchema(20)
افعل حتى rs.EOF
إذا rs(3)=TABLE ثم
اسم جدول الاستجابة:&rs(2)&<br />
تعيين rs1=server.CreateObject(adodb.recordset)
sql=select * من &rs(2)
تعيين rs1=conn.execute(sql)
استجابة.اكتب اسم الحقل:
من أجل i=0 إلى rs1.fields.count-1
استجابة.كتابة rs1.fields(i).name&
التالي
استجابة.اكتب <br />
افعل بينما لا rs1.eof
الرد. الكتابة
من أجل i=0 إلى rs1.fields.count-1
t=rs1.fields(i).name
استجابة.اكتب rs1(ر)&
التالي
الرد. الكتابة
rs1.movenext
حلقة
الرد. الكتابة
نهاية إذا
rs.MoveNext
حلقة
تعيين RS = لا شيء
تعيين كون = لا شيء
%>
فقط قم بتغيير اسم قاعدة البيانات وتشغيل البرنامج لرؤية النتائج.