Annotation of loncom/html/res/adm/pages/homeworkmenu.html, revision 1.1
1.1 ! albertel 1: <html>
! 2: <!--
! 3: The LearningOnline Network with CAPA
! 4: Homework Remote Cotrol
! 5: -->
! 6: <head>
! 7: <title>LON-CAPA Homework Remote</title>
! 8: </head>
! 9:
! 10:
! 11: <body bgcolor="#BBBBBB">
! 12: <basefont size=1></basefont>
! 13: <script>
! 14:
! 15: statustop='';
! 16: statusbot='';
! 17:
! 18: clienthost=window.location.host;
! 19: clientwindow=opener;
! 20:
! 21: function windowcheck() {
! 22: if (clientwindow.closed) {
! 23: clientwindow=window.open("http://"+clienthost+"/");
! 24: }
! 25: clientwindow.name='loncapaclient';
! 26: }
! 27:
! 28: function go(url) {
! 29: windowcheck();
! 30: if (url!='') {
! 31: clientwindow.window.location.href="http://"+clienthost+url;
! 32: }
! 33: }
! 34:
! 35: function gopost(url,postdata) {
! 36: windowcheck();
! 37: if (url!='') {
! 38: this.document.server.action="http://"+clienthost+url;
! 39: this.document.server.postdata.value=postdata;
! 40: this.document.server.submit();
! 41: }
! 42: }
! 43: </script>
! 44:
! 45:
! 46: <a href="javascript:gopost('/adm/grades',clientwindow.window.location.href)">View Submission</a>
! 47: <a href="javascript:go('/adm/grades')">View Submission</a>
! 48:
! 49: </body>
! 50: </html>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>