codice:
	<%
	    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