We often explore the use of ASP, and do not use other build can achieve file upload, so as to develop a mail system to support mail attachments, the answer is yes. Please see:
The following is the page to send the mail, the mail account number is the employee, the assumption is 5 digits, sendmail.asp of course, after the legal landing will be able to see
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 ">
<link rel= "stylesheet" type= "Text/css" href= "/css/forum". CSS ">
<style type=text/css>
<!--
input {font-size:9pt; color: #0011dd; Background-color: #e9e9f9; padding-top:0px}
Select {font-size:9pt; color: #0011dd; Background-color: #e9e9f9; padding-top:0px}
textarea {font-size:9pt; color: #0011dd; Background-color: #e9e9f9; padding-top:0px}
-->
</style>
<title> Mail system </title><body bgcolor= "#FEF7ED" >
<script language= "JavaScript" >
<%
If session ("myID") = "" or Len (Session ("myID")) <>5 Then
Response.Write "window.open (' nolog.asp ', target= ' _top ');"
End If
%>
function Check (theform)
{
if (theform.geterempl.value== ')
{
Alert (' Please enter the recipient! ');
Theform.geterempl.focus ();
return false;
}
if (theform.emailtitle.value== ')
{
Alert (' Please enter a theme! ');
Theform.emailtitle.focus ();
return false;
}
if (theform.emailtitle.value.length>200)
{
Alert (' Subject please less than 200 bytes ');
Theform.emailtitle.focus ();
return false;
}
if (theform.body.value.length>15*1024)
{
Alert (' Text please less than 16K ');
Theform.body.focus ();
return false;
}
if (theform.emailshowname.value.length>1024)
{
Alert (' sign please less than 1K ');
Theform.emailshowname.focus ();
return false;
}
}
</script>
<%
Meth=request.querystring ("meth")
If Meth=1 Then
Geterempl=trim (Request.QueryString ("Geterempl"))
Emailtitle=trim (Request.QueryString ("Emailtitle"))
ElseIf meth=2 Then
Mailid=trim (Request.QueryString ("Mailid"))
Set Conn=server.createobject ("Adodb.connection")
Conn.Open "dsn=; uid=; Pwd= "
Dsnpath= "dsn=; uid=; Pwd= "
Set Rs=server.createobject ("Adodb.recordset")
Selectnew= "SELECT * from T_mail where (Geterempl like '%" &session ("myID") & "%" or deleempl like '% "&session (" myID ") &"% ' or receempl like '% "&session (" myID ") &"% ") and (not deleverempl like '% ' &session (" myID ") & "%")) and mailid= ' "&mailid&" "
Rs.Open selectnew,dsnpath,3,3
If Rs.bof or rs.eof then
%>
<script language= "JavaScript" >
Alert ("You do not have permission to view this message!") ");
Window.history.back ();
</script>
<%
Response.End
Else
Body=rs ("Body")
Emailtitle=rs ("Emailtitle")
Rs.close
Set rs=nothing
Conn.close
Set conn=nothing
End If
End If
%>
<form name= "Upload_file" onsubmit= "return check (This)" action= "loadmail.asp" Method=post enctype= "multipart/" Form-data ">
<table width= "100%" border= "0" cellspacing= "2" cellpadding= "2" >
<tr>
<TD width= "11%" >
<div align= "Right" > Sender:</div>
</td>
<TD width= "89%" >
<input type= "hidden" name= Senderempl "value=" <%=session ("myID")%> ">
<%=session ("myID")%> </td>
</tr>
<tr>
<TD width= "11%" >
<div align= "Right" > Recipient:</div>
</td>
<TD width= "89%" >
<input type= "text" name= "Geterempl" size= "" value= "<%=geterempl%>" >
<input type= "checkbox" Name= "EmailLevel" value= "1" style= "Background-color: #FEF7ED" >
Emergency letters </td>
</tr>
<tr>
<TD width= "11%" valign= "Top" > </td>
<TD width= "89%" > Send multiple individuals can be separated using "<font color=" #9999FF ">|</font>", for example: <font color= "#3399FF" > 01234|01235|01236</font>, the first and last one does not need "<font color=" #9999FF ">|</font>" <br>
<font color= "#FF0000" > New function </font>: You can send the letter directly to you set <a href=&quo
