¿Como insertar una cadena grande en la tabla?

[SophiaRose]

Marca este error:
] El nombre del origen de datos es demasiado largo

/informacion/Guardar.asp, line 27


<% Set oConn = Server.CreateObject("ADODB.Connection")
'Para crear el objeto de conexion
Set RS = Server.CreateObject("ADODB.Connection")
'Objeto para insertar datos
oConn.Open "Datos"
v1 = Request.Form("Des")
v2 = Request.Form("Dep")
v3 = Request.Form("PEnvia")
v4 = Request.Form("FechaRec")
'v5 = Request.Form("HoraRec")
'v6 = Request.Form("Eje")
'v7 = Request.Form("Tema")
'v8 = Request.Form("UsoInf")
'v9 = Request.Form("TipoInf")
'v10 = Request.Form("Ins")
'v11 = Request.Form("Obs")
'v12 = Request.Form("Sint")
'v13 = Request.Form("Edo")
'v14 = Request.Form("Obs2")
'v15 = Request.Form("PRevisa")
'v16 = Request.Form("FechaRev")
SQL2 = "INSERT INTO TABLADATOS (Des,Dep,PEnvia,FechaRec) VALUES ('"+Request.Form("Des")+"','&q uot;+Request.Form("Des")+"','" +Request.Form("PEnvia")+"','"+ Request.Form("FechaRec")+"')"
Esta es mi linea 27 RS.Open SQL2, oConn
Response.Redirect "Principal.asp"
%>

[bakanzipp]

prueba asi:

SQL2 = "INSERT INTO TABLADATOS (Des,Dep,PEnvia,FechaRec) VALUES ('" & Request.Form("Des") & "','" & Request.Form("Des") & "','" & Request.Form("PEnvia")& "','" & Request.Form("FechaRec") & "')"

response.write SQL2

Set rs=oConn.execute(SQL2)

si te arroja error prueba ingresando las fechas con almohadillas (#)