version 1.5, 2001/12/19 17:17:46
|
version 1.8, 2002/04/08 19:12:25
|
Line 53 sub phase_one {
|
Line 53 sub phase_one {
|
my $defdom=$ENV{'user.domain'}; |
my $defdom=$ENV{'user.domain'}; |
$r->print(<<ENDDOCUMENT); |
$r->print(<<ENDDOCUMENT); |
<html> |
<html> |
|
<script language="JavaScript" type="text/javascript"> |
|
var editbrowser = null; |
|
function openbrowser(formname,elementname) { |
|
var url = '/res/?'; |
|
if (editbrowser == null) { |
|
url += 'launch=1&'; |
|
} |
|
url += 'catalogmode=interactive&'; |
|
url += 'mode=edit&'; |
|
url += 'form=' + formname + '&'; |
|
url += 'element=' + elementname + '&'; |
|
url += 'only=sequence' + ''; |
|
var title = 'Browser'; |
|
var options = 'scrollbars=1,resizable=1,menubar=0'; |
|
options += ',width=700,height=600'; |
|
editbrowser = open(url,title,options,'1'); |
|
editbrowser.focus(); |
|
} |
|
</script> |
<head> |
<head> |
<title>The LearningOnline Network with CAPA</title> |
<title>The LearningOnline Network with CAPA</title> |
</head> |
</head> |
<body bgcolor="#FFFFFF"> |
<body bgcolor="#FFFFFF"> |
<img align=right src=/adm/lonIcons/lonlogos.gif> |
<img align="right" src="/adm/lonIcons/lonlogos.gif"> |
<h1>Create a new Course</h1> |
<h1>Create a new Course</h1> |
<form action=/adm/createcourse method=post> |
<form action="/adm/createcourse" method="post" name="ccrs"> |
<h3>Course Title</h3> |
<h3>Course Title</h3> |
<input type=text size=50 name=title> |
<input type="text" size="50" name="title"> |
<h3>Top-level Map</h3> |
<h3>Top-level Map</h3> |
<input type=text size=50 name=topmap> |
<input type="text" size="50" name="topmap"> |
|
<a href="javascript:openbrowser('ccrs','topmap')">Browse</a> |
<h3>Course ID/Number (optional)</h3> |
<h3>Course ID/Number (optional)</h3> |
<input type=text size=30 name=crsid> |
<input type="text" size="30" name="crsid"> |
<h3>Course Cooordinator</h3> |
<h3>Course Coordinator</h3> |
Username: <input type=text size=15 name=ccuname><br> |
Username: <input type="text" size="15" name="ccuname" /><br> |
Domain: <input type=text size=15 name=ccdomain value=$defdom> |
Domain: <input type="text" size="15" name="ccdomain" value="$defdom" /> |
<input type=hidden name=phase value=two><p> |
<input type="hidden" name="phase" value="two" /><p> |
<input type=submit value="Open Course"> |
<input type="submit" value="Open Course"> |
</form> |
</form> |
</body> |
</body> |
</html> |
</html> |