Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
/asp/add.asp, line 10, column 28
Sql="Insert Into guset(name"sValues="Values(" & name &" Sql= Sql & ",title" sValues=sValues & ","& title &"
---------------------------^
正文add.asp:
<!--#include file="conn.asp"-->
<%Response.Buffer=Ture%>
<%
Dim title,body,name,email
title=Request.Form("title")
body=Request.Form("body")
name=Request.Form("name")
email=Request.Form("email")
Dim Sql,sValues
Sql="Insert Into guset(name"sValues="Values(" & name &" Sql= Sql & ",title" sValues=sValues & ","& title &"
If body<>"" Then
     Sql=Sql & ",body"
     sValues=sValues & ","& body & "
     End If 
     If email<>"" Then
     Sql= Sql & ",email"
     sValues=sValues & ","& email & "
     End If
     Sql=Sql & ",submit_date"
     sValues=sValues & ","& date & "
     Sql=Sql & ")" & sValues & ")"
     db.Execute(Sql)
     db.Close
     Response.Redirect "liuyanbanshouye.asp"
     %>
怎么改？