insert

**fbdesign** · 11-10-2007, 14:09

Ho questo file che mi fa visualizzare i dati del db access collana.mdb.
Ora vorrei fare degli insert tramite form dei titoli, della copertina del libro e del testo introduttivo.
Posto il codice, potete farmi un esempio di insert sia di testo che di caricamento immagine?
Grazie

codice:

<%@ Page Language="VB" ValidateRequest="false" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server">
    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
        ' Creo un oggetto connection, command e datareader del namespace OleDB
        Dim cn As OleDbConnection
        Dim cmd As OleDbCommand
        Dim dr As OleDbDataReader
        ' Apro la connessione
        Dim str As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("collana.mdb")
        cn = New OleDbConnection(str)
        cn.Open()
        ' Lancio una query nell'oggetto commando di OleDB
        cmd = New OleDbCommand("SELECT * FROM libri", cn)
        ' Eseguo la query in un datareader
        dr = cmd.ExecuteReader()
        ' Mostro i dati a video
        While (dr.Read())
            libri.Text += dr("titolo") & " " & dr("descrizione") & "
"
        End While
        ' Un po di pulizia...
        dr.Close()
        cn.Close()
    End Sub
</script>
<html>
    <head>
        <title>Utilizzo di ADO.NET</title>
    </head>
<body>

<form id="Modulo" runat="server">
    <asp:Label id="libri" runat="server" />
	<input type="text" name="inseriscititolo" id="inseriscititolo" /> inserisci titolo 

	<input type="text" name="inseriscitesto" id="inseriscitesto" /> inserisci testo introduttivo 

	<input type="file" name="inserisciimg" id="inserisciimg" /> inserisci copertina 

	<input type="submit" name="invia" id="invia" value="INVIA" />
</form>

</body>
</html>

**fbdesign** · 11-10-2007, 15:05

Ragà una mano please...

**DarioN1** · 11-10-2007, 16:35

Sei troppo generico . . .

Cerca su google , trovi un casino di esempi . . .

Di tutti i gusti . . .

Anche su html.it cè una guida al salvataggio di un file su disco con registrazione del suo percorso su DB , il tutto gestito con transazioni . . .

**fbdesign** · 11-10-2007, 16:59

Originariamente inviato da DarioN1
Sei troppo generico . . .

Cerca su google , trovi un casino di esempi . . .

Di tutti i gusti . . .

Anche su html.it cè una guida al salvataggio di un file su disco con registrazione del suo percorso su DB , il tutto gestito con transazioni . . .

puoi postarmi qualche link?

**fbdesign** · 12-10-2007, 10:12

Sto cercando in giro ma non ne riesco a venire a capo...

Se qualcuno potesse farmi un esempio sul codice che ho postato gliene sarei molto grato.

**fbdesign** · 12-10-2007, 10:54

OK, sono arrivato a questo punto, mi si visualizza correttamente questa pagina, prova.aspx ed all'invio dei dati mi dice "Database now updated", di errori nn c'è traccia ma il db non viene aggiornato....
Qualcuno sa dirmi perchè e come risolvere?

codice:

<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="utf-8" debug="true"%>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.Oledb" %>
<script runat="server">
	 Sub Page_Load(Source as Object, E as EventArgs)
	 End Sub

    Private ReadOnly Property StringaConnessione() As String
        Get
            Return "Provider=Microsoft.Jet.OLEDB.4.0;"& "Data Source=" & Server.MapPath("collana.mdb")&""
        End Get
    End Property
    


 	 Sub InserisciDati(Source as Object, E as EventArgs)

	    Dim cn
        Dim str
        Dim cmd

		Dim icount As Integer
 	    cn = New  OleDbConnection(StringaConnessione)

        Dim titolo = Request.Form("TextBox1")
        Dim descrizione = Request.Form("TextBox2")

        Try
            cn.Open()
            str = "insert into libri"
			str = str &"titolo,"
			str = str  &"descrizione,"
			
			cmd = New OleDbCommand(str, cn)
		

			icount = cmd.ExecuteNonQuery()
'       	Response.Write(str)

        Catch
		 cn.Close()
        End Try
       
        Label1.Text = "Database now updated"
     End Sub
</script>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Inserimento dati</title>
</head>
<body>
<div id="div1"  >
<form action="registrazione.aspx" method="post" name="collana" id="collana" runat="server">
  <table width="731" border="0" align="center">
    <tr>
      <td colspan="4" align="center" valign="middle">Iserimento dati</td>
    </tr>
    <tr>
      <td width="168" align="center" valign="middle">Titolo</td>
      <td colspan="3" align="left" valign="middle"><asp:TextBox ID="TextBox1" TextMode="SingleLine" runat="server" /><asp:RequiredFieldValidator ControlToValidate="TextBox1" ID="txtTextBox1" runat="server" Text="*Richesto" />
</td>
    </tr>
    <tr>
      <td align="center" valign="middle">Descrizione</td>
     <td colspan="3" align="left" valign="middle"><asp:TextBox ID="TextBox2" TextMode="SingleLine" runat="server" /><asp:RequiredFieldValidator ControlToValidate="TextBox2" ID="txtTextBox2" runat="server" Text="*Richesto" />
</td>
</tr>

    <tr>
      <td align="center" valign="middle">Inserisci</td>
      <td colspan="3" align="left" valign="middle"><asp:Button ID="Button1" Text="Invia" runat="server" onClick="InserisciDati"/></td>
    </tr>
  </table>
</form>
<div id="div2" align="center"></div>
<asp:Label ID="label1" runat="server"></asp:Label>
</body>
</html>

**fbdesign** · 12-10-2007, 12:20

OK sto parlando da solo come i pazzi....

Comunque continuo..
Ho inserito:

Catch ex As Exception
response.write(ex.tostring())
Finally
Dim connessione
If (Not (Connessione Is Nothing)) Then Connessione.Close()

Ora mi da un errore quando invio i dati, l'errore è questo:

System.Data.OleDb.OleDbException: Errore di sintassi nell'istruzione INSERT INTO. in Microsoft.VisualBasic.CompilerServices.Symbols.Con tainer.InvokeMethod(Method TargetProcedure, Object[] Arguments, Boolean[] CopyBack, BindingFlags Flags) in Microsoft.VisualBasic.CompilerServices.NewLateBind ing.LateGet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] TypeArguments, Boolean[] CopyBack) in ASP.prova_aspx.InserisciDati(Object Source, EventArgs E) in c:\inetpub\wwwroot\prova.aspx:riga 37

Se qualche anima pia mi da una mano a capire gliene sarei molto grato....

**DarioN1** · 12-10-2007, 12:26

Il comando che componi è sbagliato . . .

La sintassi del comando Sql che devi usare è questa :

INSERT INTO TABELLA (CAMPO1,CAMPO2) VALUES ('ciao','ciao')

**fbdesign** · 12-10-2007, 12:33

Originariamente inviato da DarioN1
Il comando che componi è sbagliato . . .

La sintassi del comando Sql che devi usare è questa :

INSERT INTO TABELLA (CAMPO1,CAMPO2) VALUES ('ciao','ciao')

cioè
INSERT into libri(titolo,descrizione) VALUES (?)

**fbdesign** · 12-10-2007, 13:00

Grazie cmq ho risolto, ho modificato l'sql così:

str = "INSERT INTO libri (titolo,descrizione) Values ('" & TextBox1.text & "', '" & TextBox2.text & "')"

Discussione: insert

Strumenti discussione

Ricerca discussione

Visualizza

insert

Permessi di invio