| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 593 人关注过本帖
标题:ASP退课功能以及分类选择课程
只看楼主 加入收藏
jessicecat
Rank: 1
等 级:新手上路
帖 子:22
专家分:7
注 册:2010-8-31
结帖率:100%
收藏
 问题点数:0 回复次数:2 
ASP退课功能以及分类选择课程
图片附件: 游客没有浏览图片的权限,请 登录注册

想 要这样的效果,点击退课按钮,就可以把所选择的全部课程退掉,也就是删掉。下面是退课代码:<%
CheckLogin()
%>
<%
sid=SafeRequest("sid",1)
kid=SafeRequest("kid",1)

if kid="" Or sid="" then
%>
<script language="JavaScript">
<!--
alert(" 错误的参数!可能还没有选择类别!");
history.back(-1);
-->
</Script>
<%
response.End()
end if

 set RS_News =Server.CreateObject("ADODB.Recordset")
 SQL_News = "select SXKC from [学生表_student] where name='"&sid&"'"
 RS_News.open SQL_News,Conn,1,3
   
If RS_News("SXKC")=""  then
    Response.Write "<script language=javascript>alert(' 该学生还未选择任何课程...');history.back();</script>"
    call CloseDatabase()
    Response.End
Else
    RS_News("SXKC") = Replace(RS_News("SXKC"),kid&",","")
    RS_News.update
end if
Set RS_News=Nothing
set RS_News =Server.CreateObject("ADODB.Recordset")'取消选择,则老师已被选数减1
SQL_News = "select yxrs from 教师表_teacher where id="&kid

RS_News.open SQL_News,Conn,1,3

if RS_News("yxrs")>0 then
 RS_News("yxrs")= RS_News("yxrs")-1
 else
  RS_News("yxrs")="0"
 end if
RS_News.update
if RS_News.state<>0 then
    RS_News.close
End if
Set RS_News=Nothing
str="退课成功!"
url="wdkc.asp"
MsgShow str,"1",url  
call CloseDatabase()
response.end
%>
一个下拉列 表,选 择了某个系点击确定后直接进入那个系的课程。可是点击确定以后数据没出来
图片附件: 游客没有浏览图片的权限,请 登录注册


有谁肯帮我修改下?

[ 本帖最后由 jessicecat 于 2010-9-16 20:08 编辑 ]
搜索更多相关主题的帖子: 选择 分类 ASP 课程 
2010-09-16 20:02
xqghp
Rank: 1
等 级:新手上路
帖 子:4
专家分:7
注 册:2009-9-6
收藏
得分:0 
齐鲁软件设计大赛的?蒽   
2010-09-24 20:48
hams
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:18
帖 子:912
专家分:3670
注 册:2008-7-30
收藏
得分:0 
1、不了解数据库结构
2、不清楚你说的“点击确定以后数据没出来”是什么数据没出来

俺不高手,俺也是来学习的。
俺的意见不一定就对,当你不认同时请点忽视按钮。
当走到十字路口不知该如何走时,可在论坛问下路,但你若希望别人能一路把你送到目的地,显然是不现实的,因为别人也有自己要走的路。
2010-09-25 15:08
快速回复:ASP退课功能以及分类选择课程
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024967 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved