أداة إدارة قاعدة البيانات عبر الإنترنت DB007 تنزيل: //www.vevb.com/codes/6195.html
نسخة الكود كما يلي:
<!-
'************************************
'*يستخدم:
'^معالجة الوصول و SQL قواعد البيانات عبر الإنترنت في واجهة العرض
'*المؤلف: جوان شيجي
'*تاريخ الخلق: 2006-5-28
'*2006-06-04 وظيفة تعديل البيانات المضافة
'*2006-06-10 أضاف وظيفة إدخال البيانات في الجداول الفارغة
'*2006-09-8 أضافت وظيفة اسم الحقل واسم الجدول لتصحيح بعض الأخطاء
'*تنفيذ SQL ، إذا تم تحديده ، فسوف يعيد النتيجة ، وإلا فإنه سيعيد النتيجة
'*يمكن استخدام هذا البرنامج مجانًا. يرجى الاحتفاظ بهذه المعلومات عند إعادة الطباعة
'************************************
->
<html>
<head>
<metahttp-equiv = "content-type" content = "text/html ؛ charset = gb2312">
<title> أداة إدارة قاعدة البيانات عبر الإنترنت DB0071.5 </title>
<StyleType = "Text/CSS">
<!-
الجسم ، td ، th {font-family: "安体" ؛ حجم الخط: 12px ؛}
النموذج {margin: 0px ؛ padding: 0px ؛}
الجسم {margin: 5px ؛ scrollbar-arrow-color:#666666 ؛ scrollbar-face-color: #dddd ؛ scrollbar-darkshadow-color:#999999 ؛ scrollb Ar-Highlight-Color: #fffff ؛ scrollbar-3dlight-color: #cccccc ؛ scrollbar-shadow-color: #fffff ؛ scrollbar-track-color: #Eeee ؛}
إدخال {width الحدود: 1px ؛ النمط الحدودي: Solid ؛ color-color:#CCCCCC#999999#999999#cccccc ؛ الارتفاع: 16px ؛}
td {background: #fff ؛}
textarea {الحدود width: 1px ؛ النمط الحدودي: Solid ؛ color-color:#cccccc#99999#99999#cccccc ؛}
ج: الرابط {text-decoration: none ؛}
ج: زار {decoration text: none ؛}
ج: تحوم {text-decoration: enderline ؛}
ج: نشط {decoration text: none ؛}
.fixspan {width: 150px ؛ White-Space: Nowrap ؛ Word-Break: Keep-All ؛ Overflow: Hidden ؛ Text-Overflow: Ellipsis ؛}
->
</style>
</head>
<body>
<٪
ifrequest ("key") = "db" ثم
جلسة ("dbtype") = طلب ("dbtype")
الجلسة ("DBSTR") = طلب ("DBSTR")
الرد. REREDIRECT "؟"
Endif
ifrequest ("key") = "createAtabase" ثم
callCreatedatabase ()
Endif
ifSession ("dbtype") = "" orsession ("dbstr") = "" ثم
٪>
<formAction = "؟ key = db" method = "post" name = "dbt">
<br>
نوع الاتصال:
<inputName = "dbtype" type = "Radio" value = "Access" onClick = "dbstr.value = 'provider = microsoft.jet.oledb.4.0 ؛ perferistecurityInfo = false ؛ password = ؛ dataSource = <٪ = server.mappath (/") & "٪>"