ASP ภาษาไทย เป็นตัว ????????????? SmartUpload ตอนที่ อัพโหลดด้วย aspSmartUpload

<%@LANGUAGE="VBSCRIPT" CODEPAGE="874"%>
<table width="790" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3"><img src="../image/head.gif" width="790" height="116"></td>
</tr>
<tr>
<td width="30" bgcolor="#CCFF00">&nbsp;</td>
<td width="730" height="300" valign="middle" background="../image/bg_gray.gif">

<%
Dim mySmartUpload
Dim item
Dim value
Dim file
dim mypassword
dim filename


Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

mySmartUpload.Upload
mypassword=mySmartUpload.form("myPassword")
intCount = mySmartUpload.Save("/webboard2/images_upload")
name = mySmartUpload.form("name")
topic = mySmartUpload.form("topic")
note = mySmartUpload.form("note")
email = mySmartUpload.form("email")
filename=trim(mySmartUpload.Files("FILE1").Filename)

ip=request.ServerVariables("REMOTE_ADDR")
sdate=DateAdd("h", 6, now())

response.Write(name & "<br>")
response.Write(topic & "<br>")
response.Write(note & "<br>")
response.Write(email & "<br>")
response.Write(ip & "<br>")
response.Write(sdate& "<br>")



<% else %>


<% end if %>
</td>
<td width="30" bgcolor="#CCFF00">&nbsp;</td>
</tr>
<tr>
<td bgcolor="#CCFF00">&nbsp;</td>
<td bgcolor="#CCFF00">&nbsp;</td>
<td bgcolor="#CCFF00">&nbsp;</td>
</tr>
</table>