<%Server.ScriptTimeout=600%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>David Kirsh : Classes</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="DK-styles.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><a href="index.html"><img src="graphics/davidKirsh-shadow.jpg" width="250" height="110" border="0"></a></td>
    <td width="450" align="right"><div align="right"></div></td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td height="10" colspan="2"></td>
  </tr>
  <tr bgcolor="#CCCCCC">
    <td height="1" colspan="2"></td>
  </tr>
  <tr>
    <td height="5" colspan="2"> </td>
  </tr>
  <tr>
    <td colspan="2"><table width="100%" border="0">
        <tr>
          <td><!-- InstanceBeginEditable name="Home" --><a href="index.html" class="navHot">Home</a><!-- InstanceEndEditable --></td>
          <td align="center"><!-- InstanceBeginEditable name="Research" --><a href="research.html" class="navCurrent">Research</a><!-- InstanceEndEditable --></td>
          <td align="center"><!-- InstanceBeginEditable name="Publications" -->
            <a href="publications.html" class="navHot">Publications</a><!-- InstanceEndEditable --></td>
          <td align="center"><span class="navHot"> </span> <!-- InstanceBeginEditable name="Classes" --><a href="classes.html" class="navHot">Classes</a><!-- InstanceEndEditable --></td>
          <td align="center"> <!-- InstanceBeginEditable name="Consulting" --><a href="consulting.html" class="navHot">Consulting</a><!-- InstanceEndEditable --></td>
          <td align="center"><!-- InstanceBeginEditable name="My Lab" --><a href="lab.html" class="navHot">My Lab</a></td>
          <td align="right"><!-- InstanceBeginEditable name="My Lab" --><a href="fileupload.asp" class="navHot">Files</a><!-- InstanceEndEditable --></td>
        </tr>
      </table></td>
  </tr>

  <tr>
    <td colspan="2"><table width="100%" border="0">
	<tr><td>

     <% Response.Cookies("genet_view") = "docked" %>








<%if request("action") = "" then%>

<table width=100%>
<tr>
<td valign=top>
<br><BR>

				<table width=100% height=150 cellspacing=0 cellpadding=0  align=center style="font-family:verdana;font-size:11px" border=0>
	<!--				<tr>
					<td width=120 valign=top><img src="../download3.jpg" border=0 ></td>
					<td valign=top>
						<span style="font-size:14px"><strong>File Download</strong></span><br>
						Need a file from me?  If I've given you a password, go ahead and get it.<br>

						<form action="listfiles.asp" method=post target="files">
						<table class=mainText>
						<tr><td colspan=2>&nbsp;</td></tr>
						<tr>
							<td height=20>
								<%if request("result") = "error" then%>
									<span style='color:red'>Invalid Login</span>
								<%end if%>
							</td>
							<td height=20 ><input type="password" style="width:70px" name="password">&nbsp;<input type=submit value="Go" onclick="var files=window.open('', 'files', 'width=400, height=400, scrollbars=yes, resizable=yes')">
							<br>
							<span style="font-size:12px">New Window<input type="radio" name="view" value="newWindow" onclick="document.location='fileupload.asp?cookie=true'">&nbsp;&nbsp;&nbsp; Docked</span><input type="radio" name="view" value="newWindow" onclick="document.location='fileupload.asp?'" CHECKED>
							</td></tr></table>
						</form>

					</td>
					</tr>
					<tr><td height=20 colspan=2>&nbsp;<br><br><br></td></tr>
					-->

					<tr>
					<td width=120 valign=top><img src="upload.jpg" border=0 ></td>
					<td valign=top >
						<span style="font-size:14px"><strong>File Upload</strong></span><br>
						Want send me a file?  Go ahead and upload it to my site.  						<br><br>

						<form enctype="multipart/form-data" action="fileupload_upload.asp?action=fileuploadprocess" method=post>
						File you want to upload: <br><br><input type=file name="blah">
						<!--<input type=text size=40 value="<%=request("lastFile")%>" onclick="document.forms[0].file.value=this.value">-->
						&nbsp;<input type=submit value="Upload">&nbsp;
						</form>
						<%if request("result") = "success" then response.write "<span style='color:blue'><strong>Thanks</strong></span><br><br>"%>
					</td>

					</tr>


				</table>
	</td>
	</tr>
	<tr>
	<td style="border:1px solid #888888">

		<!--#include file="listfiles.asp"-->
	</td>
</tr>
</table>


<%elseif request("action") = "fileuploadprocess" then

	Set uploadObject = Server.CreateObject("softartisans.fileup")
	if not uploadObject.IsEmpty then
		'file = split(uploadObject.userFileName, "\")
		'extension = right(file(Ubound(file)), 4)
		'newfilename = file(ubound(file)) & "_" & replace(date(), "/", "_") & extension
		newfilename = uploadObject.userFilename
	end if
	'save picture
	uploadObject.saveas "d:\inetpub\wwwroot\kirsh\fileupload\" & newfilename
	response.redirect "fileupload_upload.asp?result=success&lastFile=" & uploadObject.userFilename



end if%>




    </td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td height="25" colspan="2"></td>
  </tr>
  <tr bgcolor="#CCCCCC">
    <td height="1" colspan="2"> </td>
  </tr>
  <tr>
    <td height="10" colspan="2" align="right"> </td>
  </tr>
  <tr>
    <td colspan="2" align="right"><a href="kirsh@ucsd.edu"><img src="graphics/davidKirsh-footerShadow.jpg" width="250" height="125" border="0"></a></td>
  </tr>
  <tr>
    <td colspan="2">&nbsp;</td>
  </tr>
</table>
</body>
</html>