<% Option Explicit %>
<html>
<head>
<title>ThaiCreate.Com ASP & aspSmartUpload</title>
</head>
<body>
<%
Dim mySmartUpload
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
If IsObject(mySmartUpload) Then
Response.write("aspSmartUpload Connected")
Else
Response.write("Can not Connect to aspSmartUpload")
End IF
%>
</body>
</html>