1 Star 1 Fork 1

GMYXDS/ZF-system

加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
该仓库未声明开源许可证文件(LICENSE),使用请关注具体项目描述及其代码上游依赖。
克隆/下载
js_xkqk_PrintDialog.aspx 3.04 KB
一键复制 编辑 原始数据 按行查看 历史
sysorem 提交于 2016-06-16 00:10 . zf
<!--
'=======================================================
'工程学院专用
'此文件是在“教师-选课情况”文件里面,打印成绩时的跳出对话框,用于选择班级
'=======================================================
-->
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="js_xkqk_PrintDialog.aspx.vb" Inherits="zjdx.ja_xkqk_PrintDialog" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="gb2312">
<head>
<title>现代教学管理信息系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="gb2312" />
<meta content="all" name="robots" />
<meta name="author" content="sunleoo@gmail.com" />
<meta name="Copyright" content="正方软件 zfsoft" />
<meta name="description" content="教务软件 学分制 教学管理" />
<meta content="教务软件 学分制 教学管理" />
<link rel="icon" href="/favicon.ico" type="image/x-icon" />
<link rel="stylesheet" rev="stylesheet" href="style/main.css" type="text/css" media="all" />
<style>
TD { FONT-SIZE: 9pt }
INPUT { FONT-SIZE: 9pt }
SELECT { FONT-SIZE: 9pt }
</style>
<script language="VBScript">
Sub PopWin()
Dim xkkh, jfz, bjdm, bmc
xkkh = "<%=Request.QueryString("xkkh")%>"
jfz = "<%=Request.QueryString("jfz")%>"
bmc = "<%=Request.QueryString("bmc")%>"
xsfs = "<%=Request.QueryString("xsfs")%>"
bjdm = Document.all("ddlBJ").value
Dim Url, sFeature
url = "tocjbexcel_gc.aspx?xkkh=" + xkkh + "&jfz=" + jfz + "&bjdm=" + bjdm + "&bmc=" + bmc + "&xsfs=" + xsfs
sFeature = "toolbar=0,location=0,directories=0,status=0,menubar=1,scrollbars=1,resizable=1"
Window.Open Url,"toexcel",sFeature
End Sub
</script>
</head>
<body MS_POSITIONING="GridLayout" onload="window.focus()" bgcolor="#d4d0c8">
<form id="Form1" method="post" runat="server">
<iframe src="head.htm" frameborder="0" scrolling="no" width="100%" height="59"></iframe>
<div id="main">
<div id="title">
<div id="title_l"></div>
<div id="title_m">打印成绩录入对话框</div>
<div id="title_r"></div>
</div>
<div id="content"> <table>
<tr>
<td>班级名称</td>
<td><asp:dropdownlist ID="ddlBJ" Runat="server" DataTextField="XZB" DataValueField="BJDM" Width="160pt"></asp:dropdownlist></td>
</tr>
<tr>
<td height="30" valign="bottom" colspan="2" align="middle">
<input type="button" id="ToExcel" value=" 打 印 " onclick="VBScript:PopWin" class="button">
<input type="button" id="CloseMe" value=" 关 闭 " onclick="window.close()" class="button"></td>
</tr>
</table></div>
</div>
<div id="bottom">
<iframe src="bottom.htm" frameborder="0" scrolling="no" width="100%" height="28"></iframe>
</div>
</form>
</body>
</html>
Loading...
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化
1
https://gitee.com/GMYXDS/ZF-system.git
git@gitee.com:GMYXDS/ZF-system.git
GMYXDS
ZF-system
ZF-system
master

搜索帮助