Visualizzazione dei risultati da 1 a 3 su 3
  1. #1
    Utente di HTML.it
    Registrato dal
    Jun 2002
    Messaggi
    585

    leggere da Db e creare record

    Ciao !!
    Vi ringrazio in anticipo dell' aiuto xche' sono impantanato....
    Ho questo problema.
    Nella mia pagina asp richiamo in una form dei valori contenuti in un record specifico del database presente in una tabella temporanea t_temp.
    Vorrei che una volta richiamati, uno li potesse modificare e creare un nuovo record nel db in una tabella diversa che si chiama t_sal, che pero' contiene gli stessi campi.
    Questo e' il codice della pagina index.asp in cui richiamo i valori e poi di seguito il codice della pagina ins_db.asp in cui vado a scrivere nel db.
    Cio' che ottengo e' la creazione di un record che pero' e' completamente vuoto

    *****index.asp ***
    <%@ Language=VBScript %>
    <% Option Explicit
    Dim objConn, objRS, strSQL%>

    <html>
    <body>
    <%
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.ConnectionString = "DSN=sal.dsn"
    objConn.Open
    strSQL = "SELECT * FROM t_temp WHERE Num = 180"
    Set objRS = objConn.Execute(strSQL)
    %>

    <form method="POST" enctype="text/plain" action="ins_db.asp ?table=t_sal " webbot-onSubmit language="JavaScript" name="FrontPage_Form2">
    <input type="text" name="field1" id="field1" value="<%=objRS("Field1")%>" /
    <input type="submit" value="Submit" name="Send">
    </form>
    <%
    objRS.Close
    objConn.Close
    Set objConn = Nothing
    %>
    </body></html>

    ****** ins_db.asp ****

    <%@ Language=VBScript %>
    <%
    Option Explicit
    Dim objConn, objRS
    '
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.ConnectionString = "DSN=sal.dsn"
    objConn.Open
    '
    Set objRS = Server.CreateObject("ADODB.Recordset")
    objRS.Open t_sal , objConn, , 3, 2
    objRS.AddNew
    '
    objRS("Field1") = Request.Form("field1")
    '
    objRS.Update
    objRS.Close
    Set objRS = Nothing
    objConn.Close
    Set objConn = Nothing
    %>

    <HTML>
    <BODY>
    <SCRIPT language="JavaScript">
    alert("Message Well Received!");
    window.location='http://nome_server/index.asp';
    </SCRIPT></BODY></HTML>

  2. #2
    Utente di HTML.it L'avatar di mexican
    Registrato dal
    Oct 2001
    residenza
    cava de tirreni
    Messaggi
    3,541

    Re: leggere da Db e creare record

    Originariamente inviato da betto
    Ciao !!
    Vi ringrazio in anticipo dell' aiuto xche' sono impantanato....
    Ho questo problema.
    Nella mia pagina asp richiamo in una form dei valori contenuti in un record specifico del database presente in una tabella temporanea t_temp.
    Vorrei che una volta richiamati, uno li potesse modificare e creare un nuovo record nel db in una tabella diversa che si chiama t_sal, che pero' contiene gli stessi campi.
    Questo e' il codice della pagina index.asp in cui richiamo i valori e poi di seguito il codice della pagina ins_db.asp in cui vado a scrivere nel db.
    Cio' che ottengo e' la creazione di un record che pero' e' completamente vuoto

    *****index.asp ***
    <%@ Language=VBScript %>
    <% Option Explicit
    Dim objConn, objRS, strSQL%>

    <html>
    <body>
    <%
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.ConnectionString = "DSN=sal.dsn"
    objConn.Open
    strSQL = "SELECT * FROM t_temp WHERE Num = 180"
    Set objRS = objConn.Execute(strSQL)
    %>

    <form method="POST" enctype="text/plain" action="ins_db.asp ?table=t_sal " webbot-onSubmit language="JavaScript" name="FrontPage_Form2">
    <input type="text" name="field1" id="field1" value="<%=objRS("Field1")%>" /
    <input type="submit" value="Submit" name="Send">
    </form>
    <%
    objRS.Close
    objConn.Close
    Set objConn = Nothing
    %>
    </body></html>

    ****** ins_db.asp ****

    <%@ Language=VBScript %>
    <%
    Option Explicit
    Dim objConn, objRS
    '
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.ConnectionString = "DSN=sal.dsn"
    objConn.Open
    '
    Set objRS = Server.CreateObject("ADODB.Recordset")
    objRS.Open t_sal , objConn, , 3, 2
    objRS.AddNew
    '
    objRS("Field1") = Request.Form("field1")
    '
    objRS.Update
    objRS.Close
    Set objRS = Nothing
    objConn.Close
    Set objConn = Nothing
    %>

    <HTML>
    <BODY>
    <SCRIPT language="JavaScript">
    alert("Message Well Received!");
    window.location='http://nome_server/index.asp';
    </SCRIPT></BODY></HTML>
    Hai controllato che ti scrive i valori nel value? Prova a vedere l'html della pagina e vedi se i value sono vuoti.

  3. #3
    Utente di HTML.it
    Registrato dal
    Jun 2002
    Messaggi
    585
    Ho visto adesso che togliendo nel form il pezzo di codice enctype="text/plain" avviene il passaggio.

    Sono felice !!

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.