الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اول التجارب في ASP و لكن هنالك مشكلة

مغلق
بدأه Gigaman في 3 فبراير 2002 · 6 رد · 590 مشاهدة · في منتدى تصميم صفحات الويب
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

<%
Dim DB
Set DB = Server.CreateObject (“ADODB.Connection”)
DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" +
“C:DatabasesStudents.mdb”)
Dim RS
Set RS = Server.CreateObject (“ADODB.Recordset”)
RS.Open “SELECT * FROM Students”, DB
If RS.EOF And RS.BOF Then
Response.Write “There are 0 records.”
Else
RS.MoveFirst
While Not RS.EOF
Response.Write RS.Fields (“FirstName”)
Response.Write RS.Fields (“LastName”)
Response.Write “
”
RS.MoveNext
Wend
End If
%>
post-1386-1223033542.jpg
#2

<%
Dim DB
Set DB = Server.CreateObject (“ADODB.Connection”)
DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="&
“C:DatabasesStudents.mdb”)
Dim RS
Set RS = Server.CreateObject (“ADODB.Recordset”)
RS.Open “SELECT * FROM Students”, DB,3
If RS.EOF And RS.BOF Then
Response.Write “There are 0 records.”
Else
RS.MoveFirst
While Not RS.EOF
Response.Write RS.Fields(“FirstName”)
Response.Write RS.Fields(“LastName”)
Response.Write “
”
RS.MoveNext
Wend
End If
%>
#3

زهذه هي رسالة الخطأ

كيف اعرف انه هنالك خطأ

لقد قمت بنسخ ولصق المثال مباشر

هل من الممكن ايها الاعضاء الكرام كتابة المثال من جديد و تجربته

و سلمكم الله من كل مكروه

HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services

--------------------------------------------------------------------------------

Technical Information (for support personnel)

Error Type:
Microsoft VBScript compilation (0x800A0408)
Invalid character
/asp/time.asp, line 8, column 30
Set DB = Server.CreateObject (" ADODB.Connection" )
-----------------------------^


Browser Type:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0) 

Page:
GET /asp/time.asp 

Time:
Sunday, February 03, 2002, 2:24:32 PM 


More information:
Microsoft Support
post-1386-1223033542.jpg
#4

ال "" المكتوبة في رسالتك مكتوبة بطريقة خطاء إنظر التعديل في الرسالة بالخط الأحمر

وإكتبها بهذاك الشكل وجرب مرة اخرى

#5

<%

Dim DB

Set DB = Server.CreateObject("ADODB.Connection")

DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="&"C:InetpubwwwrootASPStudents.mdb")

Dim RS

Set RS = Server.CreateObject("ADODB.Recordset")

RS.Open "SELECT * FROM students", DB

If RS.EOF And RS.BOF Then

Response.Write"There are 0 records."

Else

RS.MoveFirst

While Not RS.EOF

Response.Write RS.Fields("FirstName")

Response.Write RS.Fields("Lastname")

Response.Write "


"

RS.MoveNext

Wend

End If

%>

post-1386-1223033542.jpg
#6

هل لي ان اعرف ما هو عمل هذا الكود بالضبط ...........

#7

بكل بساطة

هذا الكود كتوب بلغة ASP

الهدف من المثال استعراض ما بداخل قاعدة البيانات من بيانات وتحويلها الى صفحة في الانترنت

و تعلمك كيفية نشر قاعدة البيانات على الانترنت

على العموم هذا مثال بسيط جدا

ولكن اذا تعلمت الاساسيات في نشر الداتا بيس على الانترنت بشكل جيد سوف يفيدك في امور لا حصر لها

و لا تتردد في اي اسفتسار فنحن في الخدمة

(g) (f) (f)

post-1386-1223033542.jpg

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…