มัน error บรรทัดนี้ครับมันผิดตรงไหนช่วยหน่อยครับ
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
code asp
<!--#include file="inc/connect.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">
<title>Untitled Document</title>
</head>
<body>
<%
Dim mySmartUpload
Dim strSQL,objExec
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.Upload
If mySmartUpload.Files("file1").FileName <> "" Then
mySmartUpload.Files("file1").SaveAs(Server.MapPath("images/" & mySmartUpload.Files("file1").FileName))
Response.write mySmartUpload.Files("file1").Name & " Uploaded.<br>"
strSQL = ""
strSQL = strSQL &"INSERT INTO product "
strSQL = strSQL &"(p_name,p_detail,p_price,p_img,c_id) VALUES ('"&Request.Form("p_name")&"','"&Request.Form("p_detail")&"','"&Request.Form("p_price")&"','"&mySmartUpload.Files("file1").FileName&"','"&Request.Form("c_id")&"',)"
Set objExec = Conn.Execute(strSQL)
End If
Response.write("<a href=AspSmartUpload9.asp>View files</a>")
Set mySmartUpload = Nothing
%>
</body>
</html>
Load balance : Server 00
