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

مشكلة ال Check في الفورم الدي يظهر سجلات كثيرة

مغلق
بدأه basharss في 2 أغسطس 2004 · 2 رد · 350 مشاهدة · في منتدى تصميم صفحات الويب
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

يا اخواني ارجو ان تساعدوني ، انا قمت بعمل صفحة اه اس بي تقوم بعرض كل الاسئلة من جدول الاسئلة وامام كل سؤال يتعين على المستخدم اختيار الاجابة اما نعم او لا ثم يضغط زر ارسال ليتم تعديل اجابته في قاعدة البيانات، عندما كانت الاجابة صندوق نص : True/False

كان ينجح المتصفح في عرض البيانات وفي التعديل عليها ولكن عندما حولت الاجابة لصندوق شك بوكسCHECKBOX

فإنه بالرغم من عدم اعطائه اي خطء فإنه لا ينجح بالتعديل أي لا يعدل ، وهنا صفحة عرض البيانات وصفحة التعديل :

صفحة عرض البيانات :

<!--#include file="connection.txt"-->
<%
set QRS = server.CreateObject("ADOdb.recordset")
QRS.Open "SELECT *  FROM  Assessment  ",conn
%>
<table cellpadding="1" cellspacing="1"  bgcolor="#CC99FF" border="3">
<tr align="center">
<td><b>
No</b>
</td>
<td><b>
The Statement
</b></td>
<td><b>
Result(True/False)
</b></td>
</tr>

<form action="updateqrs.asp" method="post" id=form1 name=form1 lang="ar">
<%
do while not QRS.eof
%>

<tr align="center" >
<td><b>
<%
Response.Write(QRS("NoSt"))
%>
</b></td><td  align=left><b>   
<%=Response.Write(QRS("DomainStatementTextAra"))%></b>
</td>
<td>
<input type="CheckBox" name = "statvalue" value ="<%=QRS("StatementValue")%>"  >
</td></tr>
<input name="AssNo" type="hidden" value="<%=QRS("AssessmentNo")%>">
<%

QRS.movenext
loop
%>
</table>
<input name="mod" type="submit">
</form>

<%
QRS.Close
set QRS = nothing
set conn = nothing
%>

وهنا صفحة التعديل updateqrs :

<!--#include file="connection.txt"-->
<%
for i=1 to request.form("statvalue").count

sql = "Update Assessment SET StatementValue = "&Request.form("statvalue")(i)&" Where AssessmentNo ="&Request.form("AssNo")(i)&""

conn.execute sql

next

conn.close
%>

ارجو منكم اخوتي ان تساعدوني وبارك الله فيكم

logosite.gif
#2

السلام عليكم

قم بوضع الصفحتين وقاعدة البيانات لكي استطيع من تحميلهم.

مع تحياتي

MCP

MCTS:.Net Framework 2.0: Web Applications

MCPD:Web Developer

#3

شكراً جداً عبدالله شقلية على ردك ، انت دائماً قدها و ارجو ان تعطيني عنوان موقعك الشخصي عندما تنتهي منه، لقد وجدت الحل للسؤال الذي قمت بطرحه ، بالرغم من انني اعاني من هذه المشكلة منذ 3 ايام ولم استطع حلها الا بعد تصفحي الموضوع المثبت اختبارات الجامعه قد افادني ويسر علي حل المشكلة حيث خطرت ببالي فكرة الحل ونجحت بإذن الله ، والتعديل الذي قمت به على الصفحتين مبين ادناه :

صفحة العرض:

<%
set QRS = server.CreateObject("ADOdb.recordset")
QRS.Open "SELECT *  FROM  Assessment  ",conn
%>
<table cellpadding="1" cellspacing="1"  bgcolor="#CC99FF" border="3">
<tr align="center">
<td><b>
No</b>
</td>
<td><b>
The Statement
</b></td>
<td><b>
Result(True/False)
</b></td>
</tr>

<form action="updateqrs.asp" method="post" id=form1 name=form1 lang="ar">
<%
i = 1
do while not QRS.eof
%>

<tr align="center" >
<td><b>
<%
Response.Write(QRS("NoSt"))
%>
</b></td><td  align=left><b>   
<%=Response.Write(QRS("DomainStatementTextAra"))%></b>
</td>
<td>
<% if QRS("StatementValue") = -1 then
rsss = "Checked"
tr = "Yes"
else
rsss = "No"
tr = 0
end if
%>
<input type="CheckBox" name = "statvalue<%=i%>" value ="<%Response.Write(tr)%>"  <%Response.Write(rsss)%> >
</td></tr>
<input name="AssNo" type="hidden" value="<%=QRS("AssessmentNo")%>">
<%
i = i+1
QRS.movenext
loop
%>
</table>
<input name="mod" type="submit">
</form>

<%
QRS.Close
set QRS = nothing
set conn = nothing
%>

وصفحة التحديث:

<!--#include file="connection.txt"-->
<%
for i=1 to request.form("AssNo").count

if Request.form("statvalue"&i&"") <> "" then
sql = "Update Assessment SET StatementValue = True Where AssessmentNo ="&Request.form("AssNo")(i)&""
else
sql = "Update Assessment SET StatementValue = False Where AssessmentNo ="&Request.form("AssNo")(i)&""

end if
conn.execute sql

next

conn.close
%>

ارجو ان يكون الكود اعلاه واضح للجميع

انا حالياً اقوم بنشر اعمالي على العنوان

http://www32.brinkster.com/basharss/mainmentee.asp

و شكرا لكم

logosite.gif

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

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

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

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

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

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