使用同一个链接文本，链接指向不同的网页，可以吗？ - 编程论坛

#2

yms1232009-07-20 18:47

可以用ASP或Javascript都能实现比如
<%
   Select Case 题型
       Case "Access"
           Response.Write "<a href=Access.asp>添加题目</a>
       Case "计算机基础"
           Response.Write "<a href=Computer.asp>添加题目</a>
   End Select
%>

#3

lilia67012009-07-20 18:59

谢谢！我马上试试

#4

yms1232009-07-20 19:59

回复 3楼 lilia6701

我的代码只是参考和思路，要用的话需要根据实际情况进行修改的。

#5

lilia67012009-07-20 21:30

我原来的链接是这样写的
<a href="#" onClick="Javascript:window.open('Question_add.asp?coursesname=<%=(Recordset2.Fields.Item("coursesName").Value)%>&chapterName=<%=(Recordset3.Fields.Item("chapterName").Value)%>&QuestionType=<%=(Recordset4.Fields.Item("questionTypeName").Value)%>','','width=650,height=600')">添加题目</a>

把链接放到select case语句中，如下：
<% QuestionTypeID=Request.QueryString("QuestionTypeID") %>
<%
select Case QuestionTypeID
             Case "0"
              Response.Write "<a href='Question_add1.asp>添加题目</a>"
             Case "1"
              Response.Write "<a href='Question_add2.asp>添加题目</a>"
  End Select
  %>

我怎么样才能像原来那样链接呢？需要传递参数，而且参数值又是通过ASP语句得到。

谢谢！

#6

multiple19022009-07-21 06:27

<% QuestionTypeID=Request.QueryString("QuestionTypeID") %>
<%
select Case QuestionTypeID
             Case "0"
              Response.Write "<a href=""Question_add1.asp?cateID=" & icateID & """>添加题目</a>"
             Case "1"
              Response.Write "<a href=""Question_add2.asp?cateID=" & icateID & """>添加题目</a>"
  End Select
  %>

#7

lilia67012009-07-21 12:45

这样做对吗？

老师再帮我看看
我这样传递多参数，行吗？好像传不过去耶。谢谢！

<% QuestionTypeID=Request.QueryString("QuestionTypeID")
  coursesname=(Recordset2.Fields.Item("coursesName").Value)
  chapterName=(Recordset3.Fields.Item("chapterName").Value)
  QuestionType=(Recordset4.Fields.Item("questionTypeName").Value)
%>
<%
             select Case QuestionTypeID
             Case "0"
              Response.Write "<a href=""Question_add1.asp?coursesname=" & coursesname & "&chaptername=" & chaptername & "QuestionType=" & QuestionType & """>添加题目</a>"
             Case "1"
              Response.Write "<a href=""Question_add2.asp?cateID=" & icateID & """>添加题目</a>"
              End Select
              %>

#8

yms1232009-07-21 12:56

Response.Write "<a href=Question_add1.asp?coursesname=" & coursesname & "&chaptername=" & chaptername & "QuestionType=" & QuestionType &" >添加题目</a>"

#9

lilia67012009-07-21 21:34

谢谢两位老师

谢谢两位老师，为我的问题费心了

我按照你们的方法实现了一个链接，根据不同条件转向不同页面。

我希望添加题目页面Question_add.asp在一个窗口中打开，添加完或不添加题目关闭窗口立即回到题目列表Question_list.asp页面。
我把
<a href="#" onClick="Javascript:window.open('Question_add.asp?coursesname=<%=(Recordset2.Fields.Item("coursesName").Value)%>&chapterName=<%=(Recordset3.Fields.Item("chapterName").Value)%>&QuestionType=<%=(Recordset4.Fields.Item("questionTypeName").Value)%>','','width=650,height=600')">添加题目</a>
换成
<% QuestionTypeID=Request.QueryString("QuestionTypeID")
  coursesname=(Recordset2.Fields.Item("coursesName").Value)
  chapterName=(Recordset3.Fields.Item("chapterName").Value)
  QuestionType=(Recordset4.Fields.Item("questionTypeName").Value)
  %>
<a href="#" onClick="Javascript:window.open('Question_add.asp?coursesname="&coursesName&"&chapterName="&chapterName&QuestionType="&questionTypeName&"','','width=650,height=600')">添加题目</a>
怎么就链接不上了呢？

#10

yms1232009-07-22 12:50

以下是引用lilia6701在2009-7-21 21:34的发言：

谢谢两位老师，为我的问题费心了

我按照你们的方法实现了一个链接，根据不同条件转向不同页面。

我希望添加题目页面Question_add.asp在一个窗口中打开，添加完或不添加题目关闭窗口立即回到题目 ...

https://bbs.bccn.net/viewthread.php?tid=225295&extra=page%3D1%26amp%3Bfilter%3Ddigest
看了这个帖子你就知道自己哪里写错了。

#11

lilia67012009-07-22 22:00

谢谢！

从你们那儿学到不少东西，拼拼凑凑我的问题终于解决了！

我是这样做的：
<% QuestionTypeID=Request.QueryString("QuestionTypeID")%>
<% coursesname=(Recordset2.Fields.Item("coursesName").Value)
chapterName=(Recordset3.Fields.Item("chapterName").Value)
QuestionType=(Recordset4.Fields.Item("questionTypeName").Value)
%>
<%
             select Case QuestionTypeID
             Case "0"%>
             <a href="#" onClick="Javascript:window.open('Question_add0.asp?coursesname=<%=coursesName%>&chapterName=<%=chapterName%>&QuestionType=<%=questionType%>','','width=650,height=600')">添加题目</a>
             <%Case "1"%>
              <a href="#" onClick="Javascript:window.open('Question_add1.asp?coursesname=<%=coursesName%>&chapterName=<%=chapterName%>&QuestionType=<%=questionType%>','','width=650,height=700')">添加题目</a>
             <%Case "2"%>
      <a href="#" onClick="Javascript:window.open('Question_add2.asp?coursesname=<%=coursesName%>&chapterName=<%=chapterName%>&QuestionType=<%=questionType%>','','width=650,height=400')">添加题目</a>
  <% End Select %>

高兴啊，谢谢！

#12

lilia67012009-07-22 22:01

没看见，又发了一遍

[[it] 本帖最后由 lilia6701 于 2009-7-22 22:04 编辑 [/it]]