errore su connessione db... :boh:

[ThePenguin]

	<%
	    nomesezione = "infolegali"
		'apro la connessione con il db
		set myConn1 = server.CreateObject("ADODB.Connection")
		dim strConnDb1
		strConnDb1 = ""
		strConnDb1 = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " & server.mappath("/mdb-database/dbsito.mdb")
		myConn1.Open(strConnDb1)
				
		mySqlSelect1 = "Select * from testisito where sezione =" & nomesezione &" order by id" 
		set myRSComS1 = server.CreateObject("ADODB.Recordset")
		myRSComS1.Open mySqlSelect1, myConn1
	
		if not(myRSComS1.EOF) and not(myRSComS1.BOF) then	
			do while not(myRSComS1.EOF)	
	%>  
  
    <div class="titolosezione"><%=myRSComS1("titolo")%></div>
	<div class="testosezione"><%=replace(myRSComS1("testo"),chr(13)&chr(10),"
")%></div>   
  
	<%
				myRSComS1.MoveNext
			loop
		else
		end if	
		myRSComS1.Close
		set myRSComS1=nothing	
		myConn1.Close
		set myConn1=nothing
	%>

e l'errore è:

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/infolegali.asp, line 44

dove ovviamente la riga 44 è quella in grassetto...
che accidenti ha stavolta...

grazie

[GudFella]

stampa la variabile mySqlSelect1 prima di eseguirla

[optime]

sezione è stringa? va tra apici

[DarioN1]

ed anche la stringa di connessione

[ThePenguin]

nada sempre errore...

[optime]

Originariamente inviato da ThePenguin
nada sempre errore...

posta la modifica

[GudFella]

Originariamente inviato da DarioN1
ed anche la stringa di connessione

penso che se fosse sbagliata la stringa di connessione l'errore sarebbe sulla riga
myConn1.Open(strConnDb1)

[DarioN1]

Puoi stampare stringa di connessione / Comando Sql ???

[GudFella]

Originariamente inviato da ThePenguin
nada sempre errore...

nella tabella " testisito " è presente un campo " id " ?

[ThePenguin]

Originariamente inviato da GudFella
nella tabella " testisito " è presente un campo " id " ?

beh certo direi...