انا متاكدة ان هذا الكود صحيح فلماذا لا يعمل

كتب :amina

تاريخ : 9/28/2002

الكود

<%@ Language=VBScript CodePage = "1256"%>

<%

Set cn = CreateObject("ADODB.Connection")

cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" & _

Server.MapPath("db1.mdb"))

Name="amina"

Set rs=cn.execute("update tabel1 set name=' "Ali" ' where name=' "&Name&" ' " )

%>

يظهر الخطا التالي

Microsoft VBScript compilation error '800a03ee'

Expected ')'

/update1.asp, line 8

Set rs=cn.execute("update tabel1 set name=' "Ali" ' where name=' "&Name&" ' " )

---------------------------------------------^

بالمناسبة اخوان

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

Set cn=Server.CreateObject("ADODB.Connection")
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db1.mdb") & ";"

Set rs=cn.execute("update tabel1 set name='" & request("name") & "'" )

أما عبارة where فلا اعلم ما الداعي منها .

بالنسبة لكتابة الاكواد استخدمي حرف C المكتوب في أعلى المحرر ومن ثم اكتبي بداخل المربع الذي يظهر .

بالتوفيق (f)

ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

رد : madani

تاريخ : 9/28/2002

اختي امينة,

المتغيرات فقط هي التي تكتب خارج الاستعلام وتربط بعلامة & ومثال ذلك المتغير Name ,اما الجملة

'Ali' فهي نص وبالتالي تكتب داخل نص الاستعلام وبالتالي يكون الاستعلام :

cn.Execute("update table1 set name='Ali' where name='" & Name & "'")

وليس :

cn.Execute("update table1 set name='"Ali"' where name='" & Name & "'")

الاخ احمد :

جملة where استعملت لتحديد السجلات التي نريد تحديث الحقل name فيها.عدم استعمال هذا الشرط سينتج عنه ان قيمة الحقل name ستصبح 'Ali' في كل السجلات

تحياتي

مدني