Microsoft JET Database Engine (0x80040E10)

[kunder]

Microsoft JET Database Engine (0x80040E10)
Nessun valore specificato per alcuni parametri necessari.

Posto il codice:

SQL = "UPDATE del_Directory_Configuration SET DirectoryName = '" & CheckString(request.form("directoryname")) & "', "
SQL = SQL & "NavigationSeperator = '" & request.form("navsep") & "', "
SQL = SQL & "ShowSubCategoryCount = " & request.form("subitemstoshow") & ", "
SQL = SQL & "EmailObjectToUse = '" & request.form("emailcom") & "', "
SQL = SQL & "MailServer = '" & CheckString(request.form("mailserver")) & "', "
SQL = SQL & "SendEmailAfterLinkAddition = " & emailforresourcesubmission & ", "
SQL = SQL & "SendEmailAfterReviewSubmission = " & emailforreviewsubmission & ", "
SQL = SQL & "SendEmailAfterErrorSubmission = " & emailforerrorsubmission & ", "
SQL = SQL & "EmailAddress = '" & CheckString(request.form("emailaddress")) & "', "
SQL = SQL & "HowManyNewLinksToShow = " & request.form("newlinks") & ", "
SQL = SQL & "HowManyPopularLinksToShow = " & request.form("popularlinks") & ", "
SQL = SQL & "HowManyResourcesInNewsletter = " & request.form("newsletteritems") & ", "
SQL = SQL & "LinksPerPage = " & request.form("linksperpagedir") & ", "
SQL = SQL & "SearchResultsPerPage = " & request.form("linksperpagesearch")
SQL = SQL & " WHERE ID = 1"

Set ConnObj = Server.CreateObject("ADODB.Connection")
ConnObj.Open MyConnStr
ConnObj.Execute(SQL)
ConnObj.Close
Set ConnObj = Nothing

End Sub

Non rieco a risolvere l'errore !!

[killer]

fai un response.write della variabile SQL prima di darla in pasto al metodo Execute delle connessione...
così vediamo se lo statement è corretto.

[kunder]

Ho provato ma non mi dà niente.

[killer]

Originariamente inviato da kunder
Ho provato ma non mi dà niente.

che vuol dire non mi da niente?
La var SQL è vuota??? Se è così abbiamo trovato l'errore direi..
Se non è così posta il codice sql

[kunder]

Mi da False

Questo è quello che ho fatto:

<%
response.write SQL = SQL & " WHERE ID = 1"
response.end
%>

[killer]

ma certo.....
non devi mica fare così!!! VVoVe: VVoVe:
basta fare:

Response.Write(SQL)
Response.End

[kunder]

Ma scusa (premetto che sono una talpa in asp) come lo inserisco il response.write rispetto al codice che ho postato ?

[killer]

Originariamente inviato da kunder
Ma scusa (premetto che sono una talpa in asp) come lo inserisco il response.write rispetto al codice che ho postato ?

Set ConnObj = Server.CreateObject("ADODB.Connection") 
ConnObj.Open MyConnStr 
'Inseriscilo qui.. insimere al Response.End
ConnObj.Execute(SQL) 
ConnObj.Close 
Set ConnObj = Nothing

[kunder]

Se faccio così non succede niente:

Set ConnObj = Server.CreateObject("ADODB.Connection")
ConnObj.Open MyConnStr
Response.Write (SQL)
Response.End
ConnObj.Execute(SQL)
ConnObj.Close
Set ConnObj = Nothing

Ma è giusto ?

[killer]

Set ConnObj = Server.CreateObject("ADODB.Connection") 
ConnObj.Open MyConnStr 
Response.Write ("***" & SQL & "***") 
Response.End 
ConnObj.Execute(SQL) 
ConnObj.Close 
Set ConnObj = Nothing

se ti stampa solo gli asterischi vuol dire che la variabile SQL è vuota.