مشکل در فایل search.asp

mamad1364

Member
من دارم برای استادم صفحه ای ایجاد میکنم که داتشجوها با وارد کردن شماره دانشجویی خودشون , نمره هاشون رو ببینن
من تا جاهایی پیش رفتم ولی به دو مشکل برخوردم
اول اینکه در قسمت سرچ یا همون جایی که دانشجو باید شماره دانشجوییشو وارد کنه اگر دانشجو فقط قسمتی از شماره دانشجویی رو وارد کنه تمام نمره های دانشجوهایی رو که شماره دانشجویی اونها شبیه عدد وارد شده باشه رو نشون میده . یعنی اگه یکی شماره دانشجوییشو عدد 8 وارد کنه نمره های هر کی رو که تو شماره دانشجوییش عدد 8 وجود داره میتونه ببینه
این هم آدرس
http://ardebili2.brinkster.net/English%20language/Search.htm
من فایل search.asp رو هم میفرستم احتمال زیاد این فایل ایراد داره . کد اون رو هم میزارم پایین

مشکل دیگه من هم اینه که اطلاعات فارسی توی بانک اطلاعاتیم موقع نمایش ایراد داره و حروف رو علامت سوال نشون میده
ممنون



کد فایل search.asp
<!-- #INCLUDE file = "adovbs.inc" -->
<%

mname=request.form("t1")
mpage=cint(request.form("PageNo"))
if mpage=0 then
mpage=1
end if

curDir = Server.MapPath("database.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DBQ=" & curDir & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"
Set rs=Server.CreateObject("ADODB.Recordset")
if mname="" then
SQLstr = "select name,family,number from tel"
else
SQLstr = "select name,family,number from tel where name like '%" & mname & "%' or family like '%" & mname & "%' or tel like '%" & mname & "%'"
end if
rs.CursorType=adOpenStatic
rs.PageSize=5
rs.Open Sqlstr,Conn
rs.AbsolutePage=mpage

%>
<html dir=rtl>
<head>

<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">

<title>Data Added</title>

<script LANGUAGE="JavaScript">
<!--
function GoPage(newPage){
srch.pageNo.value=newPage
srch.submit()
}
//-->
</script>


<style type="text/css">
<!--
a:link {
color: #000000;
text-decoration: none;
}
a:visited {
text-decoration: none;
color: #000000;
}
a:hover {
text-decoration: none;
color: #000000;
}
a:active {
text-decoration: none;
color: #000000;
}
-->
</style></head>

<body bgcolor="#FFFFFF" background="back.gif" >
<center>
<h1>نتيجه جستجو</h1>
</center>
<h3>صفحه شماره <%=mpage%></h3>
<center>
<%
if rs.eof=true then
response.write "<h3>هيچ فردى پيدا نشد</h3>"
else
%>
<table width="425" border=0>
<tr>
<td><center><b>نام</b></center></td>
<td><center></center></td>
<td><div align="center"><b>نام خانوادگي</b></div></td>
<td><center><b>نمره</b></center></td>
</tr>
<%
rsNo=0
do while rs.eof=false and rsNo<RS.PageSize
%>
<tr>
<td><div align="center"><b><%=rs("name")%></b></div></td>
<td>&nbsp;</td>
<td><div align="center"><b><%=rs("family")%></b></div></td>
<td><div align="center"><b><%=rs("number")%></b></div></td>
</tr>
<%
rs.movenext
rsNo=rsNo+1
loop
%>
</table>
<br>‎<hr width=50%>‎
<b>شماره صفحه مورد نظر خود را انتخاب كنيد</b><br>
<%
for i=1 to rs.PageCount
%> <a href="#" onclick=GoPage(<%=i%>)><b><%=i%></b></a> <%
next
%>

<form name="srch" method=post action=search.asp>
<input type=hidden name="pageNo" value=<%=mpage%>>
<input type=hidden name="T1" value=<%=mname%>>
</form>

<%end if%>

<br>
<a href="index.htm"><b>برگشت به منوي اصلي</b></a>
</center>
</body>
</html>
 

پیوست ها

  • English language.zip
    27.5 کیلوبایت · بازدیدها: 6

amirlol

Well-Known Member
دوست من بجای

SQLstr = "select name,family,number from tel where name like '%" & mname & "%' or family like '%" & mname & "%' or tel like '%" & mname & "%'"


بزار


strsql="select * FROM tel where tel = '" & mname & "'"
 

mamad1364

Member
آقا امیر ممنون
این کدی که گفتی رو تو فایل قرار دادم و جواب هم داد . حالا با اجازه میخوام دو سوال دیگه از شما بپرسم
اول اینکه شماره دانشجویی ، یک عدد 8 رقمی هستش. چه کدی باید اضافه کرد که وقتی دانشجو به فرض عدد 7 رقمی وارد کنه یه پیغام شکل پیغام های error ویندوز به کاربر بده

دوم اینکه من کدی که شما گفتید رو اظافه کردم . حالا وقتی یک دانشجو کد دانشجویی اشتباه رو وارد میکنه دیگه نمره های دانشجوهای دیگه رو نشون نمیده ولی صفحه ی The page cannot be displayed یا منظور همون صفحه خالی رو نشون میده . چطوری میشه یک پیغام مثل "شماره دانشجویی اشتباه است " رو درست کرد
ببخشید دیگه ، سوال های من تو این forum تمومی نداره
 

amirlol

Well-Known Member
ببين ما يه تابع داريم به نام len كه مي ياد و تعداد كاراكتر ها رو مي شماره
بيا بگو اگه len اش مساوي 8 نبود ! يعني چه بزرگ و چه كوچك شرط رو انجام نده


براي اينكه بخواي اون پيغامو بده اگه اشتباه باشه
بيا بعد از كارا و جايي كه مي خواي اطلاعات نمايش بده بزن
if rs.eof then
.....
end if

براي نبودنشم مي توني يه شرط به صورت else بزاري
 

جدیدترین ارسال ها

بالا