location.href e apertura div

[bibuz]

Salve ragazzi.

Ho un modulo per la richiesta di info dentro un div che si apre al clic su un link.
Una volta compiltato il modulo ho fatto in modo da creare un "Alert" per il corretto invio con questo codice:

  <script language="javascript">
alert("Il codice da lei inserito non è corretto!"); 
location.href("avanzato.asp"); 
</script>

La pagina mi viene ricaricata e di conseguenza il modulo non è visibile a meno che non clicco sul link.
Potrei fare in modo che, dopo l'invio, al ricaricmento della pagina il livello con il modulo sia visibile?

Grazie a tutti in anticipo.

[simotenax]

così è impossibile anche capire come funziona questa pagina.. posta l'html e il js completo, o almeno quello relativo al form

[bibuz]

Ok ti posto il form e il codice per inserimento.
Ecco una parte del codice del modulo:

<div id="moduloInfoDetails">
<div class="headerFinestraDettaglio">
<div class="titoloFinestraDettaglio">Contatti</div>
<div class="chiusuraFinestraDettaglio"><p class="testoChiusuraFinestraDettaglio">X</p></div>
</div>
<div id="contenutiFinestraDettaglioModuloInfo">
<form action="<%=MM_editAction%>" method="post" name="form3" id="form3" onSubmit="MM_validateForm('nomeCognome','','R','email','','RisEmail','captchacode','','R','messaggio','','R');return document.MM_returnValue">
<span class="testoGrassetto">Infotrading s.a.s</span> .

Via dei Tadolini, 26

00196 - Roma

Email: info@infotading.it

 Tel.: 06 39030035 

Fax: 06 3211189



  Compilate il modulo sottostante e verrete contattati il prima possibile dal nostro personale.

  Una mail con i dati Lei inseriti Le verr&amp;agrave; inviata all'indirizzo di posta elettronica da Lei indicato nel modulo.

  

  Nome e cognome
<input name="nomeCognome" type="text" class="campiModuli" id="nomeCognome" size="50" />
*


  

  Società
<input name="societa" type="text" class="campiModuli" id="societa" size="50" />


  

  E-Mail:
<input name="email" type="text" class="campiModuli" id="email" size="50" />
*


  

  Messaggio:
<textarea name="messaggio" cols="50" rows="4" class="campiModuli" id="messaggio"></textarea>

E questo è l'inserimento:

<%
' *** Insert Record: set variables

If (CStr(Request("MM_insert")) = "form3") Then

  MM_editConnection = MM_infotrading2009_STRING
  MM_editTable = "messaggiModulo"
  MM_editRedirectUrl = "invioModuloOk.asp"
  MM_fieldsStr  = "nomeCognome|value|societa|value|email|value|messaggio|value"
  MM_columnsStr = "nomeCognome|',none,''|societa|',none,''|email|',none,''|messaggio|',none,''"

  ' create the MM_fields and MM_columns arrays
  MM_fields = Split(MM_fieldsStr, "|")
  MM_columns = Split(MM_columnsStr, "|")
  
  ' set the form values
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_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

Dim MM_tableValues
Dim MM_dbValues

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

  ' create the sql insert statement
  MM_tableValues = ""
  MM_dbValues = ""
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_formVal = MM_fields(MM_i+1)
    MM_typeArray = Split(MM_columns(MM_i+1),",")
    MM_delim = MM_typeArray(0)
    If (MM_delim = "none") Then MM_delim = ""
    MM_altVal = MM_typeArray(1)
    If (MM_altVal = "none") Then MM_altVal = ""
    MM_emptyVal = MM_typeArray(2)
    If (MM_emptyVal = "none") Then MM_emptyVal = ""
    If (MM_formVal = "") Then
      MM_formVal = MM_emptyVal
    Else
      If (MM_altVal <> "") Then
        MM_formVal = MM_altVal
      ElseIf (MM_delim = "'") Then  ' escape quotes
        MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'"
      Else
        MM_formVal = MM_delim + MM_formVal + MM_delim
      End If
    End If
    If (MM_i <> LBound(MM_fields)) Then
      MM_tableValues = MM_tableValues & ","
      MM_dbValues = MM_dbValues & ","
    End If
    MM_tableValues = MM_tableValues & MM_columns(MM_i)
    MM_dbValues = MM_dbValues & MM_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)
	  %>
        <script language="javascript">
alert("Messaggio inviato con successo!"); 
location.href("avanzato.asp"); 
</script>

In rosso la parte di javascript.

[simotenax]

a occhio non è un problema di js ma del codice sopra (ASP?) ma non lo conosco

[bibuz]

Guarda il codice ASP funziona regolarmente.
Per ora ho fatto in modo che alla fine della sua esecuzione venga eseguito il javascript che mi da la conferma di avvenuta operazione e mi ricarica la pagina.
Qui nessun problema.

Roa come detto vorrei che al ricaricamento visualizzasse il livello con il modulo per le info.
E questo credo si possa fare solo con javascript.

[bibuz]

Ho provato a modficare il javascript in questo modo:

        <script language="javascript">
alert("Messaggio inviato con successo!"); 
location.href("avanzato.asp"); 
document.getElementById('moduloInfoDetails').style.display="block"; // visualizzare 
</script>

Pensavo di modificare la proprietà del foglio di stile del livello così da renderlo visibile ma nulla.

[bibuz]

Ho provato anche in questo modo ma nulla:

window.onload = function() {
document.getElementById('moduloInfoDetails').style .display="block"; // visualizzare