ошибка подключения vbscript sqlserver? - PullRequest
0 голосов
/ 09 марта 2011
<%@ language="vbscript" %>
<html>
<body>
<P>
<%

dim adOpenDynamic,adLockOptimistic,adCmdtext

adOpenDynamic=0

adLockoptimistic=1

adCmdtext=2
dim i
i=1
dim conn,rs,strsql
dim fname,lname,gender,month,date,year,uname,pwd,email


set conn=Server.Createobject("ADODB.Connection")
set rs=Server.Createobject("ADODB.Recordset")

conn.ConnectionString="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=myshoppe;Data Source=NVC-10\SQLEXPRESS"

conn.Open

fname=Request.Form("first_name")
lname=Request.Form("last_name")
gender=Request.Form("gender")
'month=Request.Form("Month")
'date=Request.Form("date")
'year=Request.Form("year")
email=Request.Form("email")
uname=Request.Form("user_name")
pwd=Request.Form("pwd")

strsql = "INSERT INTO user_info(fname, lname, gender, email, uname, pwd) VALUES(' " & fname & "',' " & lname &"',' " & gender & "',  "& email & "',' " & uname & "',' " & pwd & "')"                                                                

conn.Execute (strsql)
Response.Write("submitted<>")

Response.Write "Connected OK"


%>
<br>


</P>

</body>
</html>

Поставщик Microsoft OLE DB для SQL Разрешение INSERT для сервера (0x80040E09) отказано в объекте 'user_info', база данных 'myshoppe', схема 'dbo'.

1 Ответ

1 голос
/ 09 марта 2011

Вам нужна открывающая одинарная кавычка перед переменной электронной почты.

...