sto sclerando [access] e [iis]

[Radmond_Barry]

salve a tutti

ho fatto una pagina asp che mi va a interrogare un database acces.

come editor asp uso dreamweaver ultradev 4

se dal mio computer client, una volta che ho creato con dreamweaver un form di inserimento record nella tabella di access faccio "anteprima", il form funziona e inserisce il record correttamente.

se invece pubblico la pagina sul web server presente in azienda (ho back office small business 4.5) quando provo a inserire il record mi da questo bell'errore che ora copio e incollo

ADODB.Command error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/intranet/Commerc/crm/supervisore/bombelli/offerte.asp, line 88


ragazzi sono disperato non so più che fare

naturalmente l'odbc è configurato correttamente su entrambi i computer (mio client che crea la pagina asp e server) quindi non so dove stia il problema??


ringrazio il anticipatamente il benefattore che spero mi leverà da questo impiccio

[Gioba66]

forse è un problema di date...
posta la query sql che dà errore

[Radmond_Barry]

gioba66,

innanzitutto ti ringrazio molto per l'interessamento.

anche io pensavo all'inizio fosse un problema di formati interpretati in modo diverso dal mio comp (per esempio un formato data) rispetto al server che ha l'os in inglese.
però non è questo il problema poichè ho provato a minimizzare al massimo i campi inseriti nella tabella ai soli campi testo o numerici. il risultato è il medesimo.
un altro indizio che potrebbe aiutarti sta nel fatto che se io nella procedura di insert record ometto dei campi obbligatori, o inserisco dei valori che non combaciano con le caratteristiche del campo, mi succedono 2 errori diversi: quando provo a inserire un dato con l'anteprima di dreamweaver mi da questo tipo di errore

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Il codice cliente deve essere compreso tra 1 e 99999. Correggere.

/intranet/Commerc/crm/supervisore/bombelli/TMP2bmtrbqh8i.asp, line 90


se invece provo ad inserire dopo aver "puttato" la pagina mi ritorna l'errore che ho postato precedentemente
lo so è un casino spero di essere stato chiaro

[Radmond_Barry]

vi do degli aggiornamenti con delle prove che ho fatto:

se si fa l'anteprima della pagina con dreamweaver, la pagina in realtà viene già messa sul web serever, solo in un file temporaneo che poi viene eliminato.

se io prondo questo file temporaneo e lo rinomino in modo corretto, e faccio si che non si elimini una volta chiusa la pagina explorer di anteprima, l'inserimento record funziona!!! :metallica

purtroppo la gioia di aver risolto il problema (praticamente eseguendo una pubblicazione della pagina in maniera "manuale") è durata molto poco.

perchè se provo a inserire un record da un altro utente mi da un errore di permission che vi incollo qui sotto

Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database engine cannot open the file '(unknown)'. It is already opened exclusively by another user, or you need permission to view its data.
/intranet/Commerc/crm/supervisore/bombelli/offerte.asp, line 113

sono disperato ormai sto provando di tutto
ad esempio se aggiungo l'utente con cui ricevo l'errore che ho incollato tra i "domain admins" l'inserimento funziona correttamente.

ma naturalmente non posso aggiungere tutti gli utenti che dovranno utilizzare il database tra gli admin però questo indizio magari può essere di aiuto a qualche anima pia che vuole aiutarmi!!

scusate se vi secco con questo stranissimo problema ma non so più dove sbattere la testa

[diegoctn]

POSTA IL CODICE CHE TI DO UNA MANO............

[Radmond_Barry]

diego

dato chye la pagina è di oltre 400 righe mi potresti dire quali parti del codice ti interesserebbero così posto solo quelle

grazie

[diegoctn]

Innanzitutto la parte che riguarda la connessione al db. Poi quella della query.

[Radmond_Barry]

ecco quello che mi hai chiesto

ti ringrazio molto per l'aiuto che mi stai dando

parte riguardante l'inserimento del record nella tabella access

' *** Insert Record: set variables

If (CStr(Request("MM_insert")) <> "") Then

MM_editConnection = MM_go_STRING
MM_editTable = "Offerte"
MM_editRedirectUrl = "offerte2.asp"
MM_fieldsStr = "Chance|value|CFOFF1|value|cfoff5|value|idofferta| value|idannooff|value|idcliente|value|Statodocumen to|value|idlingua|value|codicevenditore|value|data documento|value|prevanno|value|prevmese|value|cffo ff2|value|idmoney|value|dataofferta|value|cfoff3|v alue|cfoff4|value|cambiomoney|value|scontoprev|val ue|instat|value"
MM_columnsStr = "Chance|none,none,NULL|CFOFF1|',none,''|CFOFF5|',n one,''|IDOfferta|none,none,NULL|IDAnnoOff|',none,' '|IDCliente|none,none,NULL|StatoDocumento|',none,' '|IDLingua|',none,''|CodiceVenditore|none,none,NUL L|DataDocumento|',none,NULL|PrevAnno|none,none,NUL L|PrevMese|none,none,NULL|CFOFF2|',none,''|IDMoney |none,none,NULL|DataOfferta|',none,NULL|CFOFF3|',n one,''|CFOFF4|',none,''|CambioMoney|none,none,NULL |ScontoPrev|none,none,NULL|InStat|none,none,NULL"

' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")

' set the form values
For i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(i+1) = CStr(Request.Form(MM_fields(i)))
Next

' append the query string to the redirect URL
If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If

End If
%>
<%
' *** Insert Record: construct a sql insert statement and execute it

If (CStr(Request("MM_insert")) <> "") Then

' create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For i = LBound(MM_fields) To UBound(MM_fields) Step 2
FormVal = MM_fields(i+1)
MM_typeArray = Split(MM_columns(i+1),",")
Delim = MM_typeArray(0)
If (Delim = "none") Then Delim = ""
AltVal = MM_typeArray(1)
If (AltVal = "none") Then AltVal = ""
EmptyVal = MM_typeArray(2)
If (EmptyVal = "none") Then EmptyVal = ""
If (FormVal = "") Then
FormVal = EmptyVal
Else
If (AltVal <> "") Then
FormVal = AltVal
ElseIf (Delim = "'") Then ' escape quotes
FormVal = "'" & Replace(FormVal,"'","''") & "'"
Else
FormVal = Delim + FormVal + Delim
End If
End If
If (i <> LBound(MM_fields)) Then
MM_tableValues = MM_tableValues & ","
MM_dbValues = MM_dbValues & ","
End if
MM_tableValues = MM_tableValues & MM_columns(i)
MM_dbValues = MM_dbValues & FormVal
Next
MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"

If (Not MM_abortEdit) Then
' execute the insert
Set MM_editCmd = Server.CreateObject("ADODB.Command")
MM_editCmd.ActiveConnection = MM_editConnection
MM_editCmd.CommandText = MM_editQuery
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close

If (MM_editRedirectUrl <> "") Then
Response.Redirect(MM_editRedirectUrl)
End If
End If

End If
%>


contenuto del file go.asp

<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
MM_go_STRING = "dsn=go;"
%>

query che interroga il database access
<%
set numeroofferta = Server.CreateObject("ADODB.Recordset")
numeroofferta.ActiveConnection = MM_go_STRING
numeroofferta.Source = "SELECT top 1 IDOfferta + 1 as offerta FROM Offerte ORDER BY idannooff desc, idofferta desc"
numeroofferta.CursorType = 0
numeroofferta.CursorLocation = 2
numeroofferta.LockType = 3
numeroofferta.Open()
numeroofferta_numRows = 0
%>