inserting into database

Last post 02-23-2007, 2:10 AM by systemdownnn. 4 replies.
Sort Posts: Previous Next
  •  02-19-2007, 11:38 PM 26814

    inserting into database

    I am having problems getting my title and message to insert in my database, my database name is mt.mdb
    and the table in the database is Tbl_Cinfo_main, and the fields are as follows ,  cinfomainID, title, description.

    i have looked at the example file todatabase.asp and tried to make it work but it doesnt. it does not insert in the database.

    i have my code below, can anyone help me. thanx.

                                       
    <form name="frm_update_hp" id="frm_update_hp" method="POST" action="aboutmt_update.asp?action=save">
                                            <span class="style3">About Us / Update</span> <br /><br />
                                            Title
                                           
                                           
                                       <%
                                       dim conn
                                       dim connstr
                                       Set conn = Server.CreateObject("ADODB.Connection")
                                       connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/mt.mdb")
                                       conn.Open connstr
                                           
                                       dim content
                                           
                                            if request("action")="save" then
                                                TitleField        =    Request.Form("title")
                                                MessageField    =    Request.Form("Editor1")        
                                           
                                                sql="select title,description from Tbl_Cinfo_main"
                                                set rs=server.createobject("adodb.recordset")
                                                rs.open sql,conn,3,3
                                               
                                                rs.addnew
                                                rs("title")    =    TitleField
                                                rs("description")    =    MessageField
                                                rs.update
                                               
                                                response.write "<font size=5 color=darkred>Message added</font>"
                                                response.write "<br>"
                                                rs.close
                                                set rs = nothing
                                            else
                                                MySQL="select top 1 * from Tbl_Cinfo_main order by cinfomainID DESC"
                                                set rs2=conn.execute(MySQL)
                                                if not rs2.eof then
                                                    TitleField     = rs2("title")
                                                    MessageField  = rs2("description")
                                                    rs2.close
                                                    set rs2=nothing
                                                end if
                                            end if   
                                            %>
                                           
                                            <input name="TitleField" type="text" id="TitleField" value="<%= TitleField %>" size="60">
                                            <br /><br />
                                            About Mail Tech
                                           
                                                        <%                       
                           
                                                            Dim editor
                                                            Set editor = New CuteEditor
                                                            editor.ID = "Editor1"
                                                            editor.Text = MessageField
                                                            editor.FilesPath = "../editor/CuteEditor_Files"
                                                            editor.Width = 700
                                                            editor.Draw()
                                                       
                                                            ' Request.Form(ID) access from other page
                                                   
                                                        %>
                                           
                                                <br />
                                             <input name="author" type="hidden" id="author" value="<%= Session("MM_Username") %>" />
                                             <input type="submit" name="Submit" value="Submit" />
                                             <input type="hidden" name="MM_insert" value="frm_update_hp">
                                          </form>

  •  02-20-2007, 10:16 AM 26830 in reply to 26814

    Re: inserting into database

    The above code looks good to me.
     
    Can you just play with todatabase.aspx inlcuded in the download package and make sure it works first?
     

    asp.net Chat http://cutesoft.net/ASP.NET+Chat/default.aspx
    Web Messenger: http://cutesoft.net/Web-Messenger/default.aspx
    asp.net wysiwyg editor: http://cutesoft.net/ASP.NET+WYSIWYG+Editor/default.aspx
    asp wysiwyg html editor: http://cutesoft.net/ASP
    asp.net Image Gallery: http://cutesoft.net/ASP.NET+Image+Gallery/default.aspx
    Live Support: http://cutesoft.net/live-support/default.aspx

  •  02-20-2007, 6:26 PM 26861 in reply to 26830

    Re: inserting into database

    yes it does work the todatabase.asp

    but mt form does not insert in the database. do you know why?

    ALSO

    But most importantly my form was working fine before i implemented the Cute editor for asp but i wanted
    to use my existing connection to the database, recorset that i had before but just be able to have my text area the cute editor. is this possible.  Much like the Web Wiz Rich Text Editor (RTE)

    http://www.webwizguide.info/asp/sample_scripts/RTE_application.asp

    anyhow can you please show me how to do this with my code and just be able to have the description field use the cute editor, to use my existing forms recordset and database conection. coz in my other forms i will be using a seperate processor file with more fields needing seaved to the database so it will make things harder.

    this is my connection and recordset code before the <head> tag

                <%
                Dim rs_cinfo
                Dim rs_cinfo_numRows
               
                Set rs_cinfo = Server.CreateObject("ADODB.Recordset")
                rs_cinfo.ActiveConnection = MM_conn_mt_STRING
                rs_cinfo.Source = "SELECT * FROM Tbl_Cinfo_main ORDER BY cinfomainID DESC"
                rs_cinfo.CursorType = 0
                rs_cinfo.CursorLocation = 2
                rs_cinfo.LockType = 1
                rs_cinfo.Open()
               
                rs_cinfo_numRows = 0
                %>

    and this is my form

                                      <form name="frm_update_hp" id="frm_update_hp" method="POST" action="<%=MM_editAction%>">
                                            <span class="style3">About Us / Update</span> <br /><br />
                                            Title
                                            <input name="title_entry" type="text" id="title_entry" value="<%=(rs_cinfo.Fields.Item("title").Value)%>" size="60">
                                            <br /><br />
                                            About Mail Tech
                                           
                                     <textarea name="aboutus_entry" cols="100" rows="20" wrap="virtual" id="aboutus_entry"><%=(rs_cinfo.Fields.Item("description").Value)%></textarea>
                                                <br />
                                                <input name="author" type="hidden" id="author" value="<%= Session("MM_Username") %>" />
                                                <input type="submit" name="Submit" value="Submit" />
                                                <input type="hidden" name="MM_insert" value="frm_update_hp">
                                          </form>


    Filed under:
  •  02-22-2007, 9:44 AM 26907 in reply to 26861

    Re: inserting into database

    systemdownnn,
     
    Step 1:
     
    Add the following at the top of your asp page.
     
    <!-- #include file = "CuteEditor_Files/include_CuteEditor.asp" -->
     
    Step 2:
     
    Change the following code:
     
    <textarea name="aboutus_entry" cols="100" rows="20" wrap="virtual" id="aboutus_entry"><%=(rs_cinfo.Fields.Item("description").Value)%></textarea>
     
    to:
     
          <%
           Dim editor
           Set editor = New CuteEditor
           
           editor.ID = "aboutus_entry"
           editor.Text = rs_cinfo.Fields.Item("description").Value
     
           editor.UseHTMLEntities = false
           editor.EditorBodyStyle = "font:normal 12px arial;"
           'editor.EditorWysiwygModeCss = "asp.css"
           editor.Draw()
                            
           ' Request.Form(ID) access from other page
          %> 
     
    Hope it helps
     
     

    asp.net Chat http://cutesoft.net/ASP.NET+Chat/default.aspx
    Web Messenger: http://cutesoft.net/Web-Messenger/default.aspx
    asp.net wysiwyg editor: http://cutesoft.net/ASP.NET+WYSIWYG+Editor/default.aspx
    asp wysiwyg html editor: http://cutesoft.net/ASP
    asp.net Image Gallery: http://cutesoft.net/ASP.NET+Image+Gallery/default.aspx
    Live Support: http://cutesoft.net/live-support/default.aspx

  •  02-23-2007, 2:10 AM 26927 in reply to 26907

    Re: inserting into database

    Great !!! Awsome it works but what i had to do is kida trick the system, as the update statement was created using dreamweaver so i had to leave the code

    <textarea name="aboutus_entry" cols="100" rows="20" wrap="virtual" id="aboutus_entry"><%=(rs_cinfo.Fields.Item("description").Value)%></textarea>

    than creat the update record with dreamweaver so it recognises to update <%=(rs_cinfo.Fields.Item("description").Value)%>
    than once that wa done remove

    <textarea name="aboutus_entry" cols="100" rows="20" wrap="virtual" id="aboutus_entry"><%=(rs_cinfo.Fields.Item("description").Value)%></textarea>

    and it does update now. great. thanx



View as RSS news feed in XML