📄 myquestion.asp

📁 在线教育系统包括答疑问题提问课程介绍可见下载等模块设计
💻 ASP
字号:

 <%
 dim rs
 Set conn = Server.CreateObject("ADODB.Connection")
 conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("CSTUDY.mdb")
 Set rs=Server.CreateObject("ADODB.RecordSet")
 mySQL = "SELECT * FROM tutorial order by ID"
rs.Open mySQL,conn,1,1%>
<HTML>
<HEAD>
<TITLE><%=title%></TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<link rel="stylesheet" type="text/css" href="css/index1.css">
<link rel="stylesheet" type="text/css" href="css/toolbar2.css">
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<base target="_self">
</HEAD>
<BODY background="image/A-bg.gif" leftMargin=0 topMargin=0>

<TABLE align=center border=0 cellPadding=0 cellSpacing=0 class=c width=760 height="42">
<tr>
<td height="20" width="196" valign="top" align="left">现在位置：<font face="华文行楷" size="4"><a href="index.asp">首页</a>—答疑</font>
</td>
<td height="1" width="413" valign="middle" align="center" rowspan="3">
<table width=371 border=0 cellspacing=0 cellpadding=0 height="30">
<tr bgcolor=#808080><td width=12 height=30 valign=top>
<img src=image/home01.gif width=7 height=7></td>
<td width=359 height="30">
<p align="center"><font color="#FFFF00">请提出您的问题</font></td>
</tr>
</table>
<table width=371 border=0 cellspacing=0 cellpadding=0 height="169">
<tr>
<td width=1 bgcolor=#ffcf5b height="290"></td>
<td height=290 valign="top" width="365">
<br>
<FORM action="addquestion.asp" method="post" name="adduser" onsubmit="return checkuser()">
<table border="1" width="348" bgcolor=#E0E5F5 borderColorDark=#ffffff borderColorLight=#660066
cellPadding=5 cellSpacing=0 align="center" height="274">
<%if session("login")<>"" and session("identity")="student" then
sql="select * from user where IDname='"&session("login")&"'"
set rs1=conn.execute(sql)
%>
<tr>
<td align="left" bgcolor="#E0E5F5" width="69" height="14">
<font color="#0000FF">登录名：</font></td>
<td align="left" width="97" height="14">
<INPUT maxLength=20 name="login" size=14 class="td1" value="<%=session("login")%>">
</td>
<td align="left" width="40" height="14">
<font color="#0000FF">密码：</font>
</td>
<td align="left" width="101" height="14">
<INPUT maxLength=15 name="passwd" size=14 type=password class="td1" value="<%=rs1("passwd")%>">
</td>
</tr>
<%else%>
<tr>
<td align="left" bgcolor="#E0E5F5" width="69" height="14">
<font color="#0000FF">登录名：</font></td>
<td align="left" width="97" height="14">
<INPUT maxLength=20 name="login" size=14 class="td1">
</td>
<td align="left" width="40" height="14">
<font color="#0000FF">密码：</font>
</td>
<td align="left" width="101" height="14">
<INPUT maxLength=15 name="passwd" size=14 type=password class="td1">
</td>
</tr>
<%end if%>
<tr>
<td align="left" bgcolor="#E0E5F5" width="69" height="13">
<font color="#0000FF">标题：</font> </td>
<td align="left" width="249" colspan="3" height="13">
<INPUT name="title" size=41 type=text class="td1">&nbsp;
</td>
</tr>
<tr>
<td align="left" bgcolor="#E0E5F5" width="69" height="13">
<font color="#0000FF">章节：</font> </td>
<td align="left" width="249" colspan="3" height="13">
<select size="1" name="chapter" class="td1">
<%
response.write "<option value=''>请选择问题所属的章节</option>"
Do While Not rs.Eof
response.write "<option value='"&rs("ID")&"'>"&rs("rule")&"、"&rs("title")&""
response.write "</option>"
rs.movenext
loop%>
</select>
</td>
</tr>
<tr>
<td align="left" bgcolor="#E0E5F5" width="69" height="174">
<font color="#0000FF">内容：</font> </td>
<td align="left" width="249" colspan="3" height="174">
<textarea rows="11" name="content" cols="39" class="td1" wrap=hard></textarea> <FONTcolor=#ff0000></td>               
</tr>
<tr>
<td width="330" align="center" colspan="4" bgcolor="#E0E5F5" height="25">　
<INPUT name=Write type=submit value=" 发 送 ">
<INPUT name=Reset type=reset value=" 重 写 ">
</td>
</tr>
</table>
</form>
</td>
<td width=1 bgcolor=#ffcf5b height="260"></td></tr>
<tr><td height=1 colspan=3 bgcolor=#ffcf5b width="367">
</td></tr>
</table>
</td>
<td height="50" width="242" valign="top" align="right" rowspan="3">

</td>
</tr>
<tr>
<td height="107" width="196" valign="top" align="center">
<TABLE border=1 bgcolor="#e6e5b8" borderColorDark=#ffffff borderColorLight=#660066 cellPadding=5 cellSpacing=0 width="141" height="64" align="left"> <TBODY>
<TR align=middle>
<TD height="89" align="center" bgcolor="#A8B8E0" width="211" background="image/A-bg.gif" valign="top">
<FORM action=check.asp method=post name=form_reg onsubmit="return checkdata()">
<p align="left"><span lang="zh-cn">用户</span>：
<input type="text" name="username" size="11" class="td1"><br><br>
<span lang="zh-cn">
密码：</span>
<input type="password" name="pwd" size="11" class="td1" ><br><br>
<span lang="zh-cn">
身份： </span><select name="identity" class="td1" style="padding-top: 5" size="1">
<option value="student" selected>我是学生</option>
<option value="teacher">我是教师</option>
</select>
<p>
<input type="Image" name="submit" border="0" src="image/AnN-DenLu.gif" width="52" height="18">
&nbsp;<a href="newuser.asp"><img src="image/AnN-ZhuCe.gif" width="52" height="18" border="0" ></a> </form>       

</TD>
</TR>
</TBODY>
</TABLE>
</td>
</tr>
<tr>
<td height="125" width="196" valign="middle" align="center">
<img border="0" src="image/tnpic029.jpg" width="129" height="80" align="left">
</td>
</tr>
</table>

</BODY>

</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -