المؤلف: Qing Apple Computer Studio
المحطة الأولى في هذا المثال هي صفحة ASP. هذه صفحة ASP متصلة بقاعدة بيانات ADO و NorthWind. من أجل الحفاظ على عادة ترميز جيدة ، أنا
تم استخدام الخيار الصريح وأعلن بوضوح جميع المتغيرات. تستخدم المسودة الأولى لصفحة ASP هذه الرمز الداخلي.
<٪ @ language = vbscript ٪>
<٪
مثال على الرمز المضمن
الخيار صريح
"إعلان المتغيرات
قاتمة أوكون
خافت
connectionstring dim
قاتمة x
ConnectionString = DSN = NorthWind ؛
تعيين OConn = server.createBject (ADODB.CONNECTION)
Oconn.Open ConnectionString
setRs = server.createBject (adodb.oldset)
قم بتعيين المتغيرات
OnDeconnection = Oconn
C C C
Ond.Open
٪>
<html>
<head>
<meta http-equiv = content-type content = text/html ؛
<title> صفحة جديدة < /title>
</head>
<body>
<H1> المنتجات < /h1>
<table cellspacing = 2 cellpadding = 5>
<TrbgColor =#ff6666>
<h> اسم المنتج < /th>
<th> الكمية لكل وحدة < /th>
<h> السعر < /th>
</r>
<٪
هل unil om.eof
إذا x = 1 ثم
x = 0
٪>
<TrbgColor =#ffcccc>
<٪ آخر ٪>
<tr>
<٪
x = 1
إنهاء إذا
٪>
<td> <٪ = ors (productName) ٪> </td>
<td> <٪ = ors (QuantityPerunit) ٪> </td>
<td> <٪ = ors (Unitprice) ٪> </td>
</r>
<٪
Ondenext
حلقة
٪>
< /table>
< /body>
</html>
<٪
'تدمير الأشياء
setRs = لا شيء
تعيين OConn = لا شيء
٪>