السلام عليكم ورحمة الله وبركاته
اخواني الاعزاء انا في ورطة كبيرة جداً........
حيث انني انشأت فورم للموقع الخاص بالشركة إلي انا شغال فيها وفي هذا الفورم المفروض يسجل الزائر معلوماته وهذه المعلومات المفروض ان تسجل داخل قاعدة بيانات حتى تقوم الشركة بمعرفة اسماء الذين سوف يشتركون في الدورات المهم حتى لا اطيل عليك انا انشات هذا الفورم ولكن لا اعرف كيف ابعته على قاعدة البيانات !!!
وقد شاهت عمل رائع بالنسبة لتعلم لغة asp وقد عملت كل شيئ ولكن دائماً يوجد خطأ في الكود مع ان كل الخطوات صحيحة لذلك فقد اكتب لك الكود وحضرتك تقولي ما هو الخطا في هذا الكود ؟
<%@ Language=VBScript CodePage = "1256"%>
<%
dim con
set con=server.createobject("ADODB.Connection")
con.provider="Microsoft.Jet.OLEDB.4.0"
con.open(server.MapPath("data.mdb"))
set rs=server.createobject("ADOdb.recordset")
%>
<%
add_dat= now()
name = request.form ("name")
company= request.form ("company")
country= request.form ("country")
city= request.form ("city")
address= request.form ("address")
tel= request.form ("tel")
fax= request.form ("fax")
mob= request.form ("mob")
email= request.form ("email")
note= request.form ("note")
if isnull(name) then
response.write "<center>" & "some field is not enter"
else
con.execute="insert into register (add_dat,name,company,country,city,address,tel,fax,mob,email,note)values('"&request("add_dat")&"',"&request("name")&","&request("company")&","&request("country")&","&request("city")&","&request("address")&","&request("tel")&","&request("fax")&","&request("mob")&","&request("email")&","&request("¬e")&")")
response.redirect "register.htm"
end if
con.close
Set ADO=Nothing
%>هذا هو الكود
برجاء الرد عليا في اقرب وقت ممكن حتى لا افقد عملي
جزاء الله خيراً على مساعدتي
اخوك محمد فتحي