Navigazione

    Privacy - Termini e condizioni
    © 2020 Search On Media Group S.r.l.
    • Registrati
    • Accedi
    • CATEGORIES
    • Discussioni
    • Non letti
    • Recenti
    • Hashtags
    • Popolare
    • Utenti
    • Stream
    • Interest
    • Categories
    1. Home
    2. massimo.c
    3. Post
    M

    massimo.c

    @massimo.c

    • Profilo
    • Chi segue 0
    • Da chi è seguito 0
    • Discussioni 6
    • Post 12
    • Migliore 0
    • Gruppi 0
    Iscrizione Ultimo Accesso
    0
    Reputazione
    12
    Post
    0
    Visite al profilo
    0
    Da chi è seguito
    0
    Chi segue
    User

    Post creati da massimo.c

    • Cercare eventi in un intervallo di date

      Buongiorno, vorrei se possibile creare un form che mi cercasse delle informazioni preinserite in un dbase mysql da una certa data ad una'altra data
      esempio:
      <form name="ricerca.php" method="post">
      <input name="Dalla data" type="text" value="da" size="10" maxlength="10" />
      <input name="Alla data" type="text" value="a" size="10" maxlength="10" />
      <input name="Search" type="button" value="search" />
      </form>

      so che dovrò mettere il nome del dbase e dei campi da ricercare e che mi dovranno dare un risultato...
      la pagina ricerca.php è il mio capirete...problema......
      :figo2:

      postato in Coding
      M
      massimo.c
    • RE: Calcolo iva

      Uao grazie mille applico un link popup e ho immediato il calcolo che immetto nel campo nuovo del mio form di inserimento
      Grazie mille!!! TonyX

      postato in Coding
      M
      massimo.c
    • Calcolo iva

      Buongiorno a tutti, ho un campo <%price%> di un form che passa i dati ad un dbase access, è possibile spostandomi nel campo successivo calcolare e visualizzare automaticamente il risultato con l'aumento IVA 20%
      grazie mille a chi può aiutarmi

      postato in Coding
      M
      massimo.c
    • RE: Aggiornamento campo immagine da record

      Ok allora in pratica devo, se esiste, cancellare la immagine in questo campo di un record attraverso magari un pulsantino delete

      <td id="list"> <%=rs.Fields("image2")%></td>

      grazie mille a chi può aiutarmi

      postato in Coding
      M
      massimo.c
    • Aggiornamento campo immagine da record

      Salve ho questo problema, voglio aggiornare un campo immagine (cioè cancellarla se serve tramite una checkbox) da un record di un dbase
      come fare...:sbav:
      posto la pagina di cancellazione del record e in grassetto il campo immagine che vorrei cancellare..

      <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
      <%
      dim rs
      dim cn
      dim msg

      set cn = server.CreateObject("Adodb.Connection")
      set rs = server.CreateObject("Adodb.Recordset")
      cn.Open conn

      if request.Form("Submit")="Delete" then
      Call Del()
      End if

      Sub Del()
      dim num
      dim i
      dim Total_Del

      num = Request.Form("num")

      for i = 1 to num
      id = Request.Form("d" & i)
      if id<>"" then
      rs.Open "Delete From Products Where ProductID=" & id, cn
      Total_Del = Total_Del + 1
      end if
      next

      msg = Total_Del & " Annunci Cancellati"
      End Sub

      rs.open "Select * From Products", cn
      %>
      <html>
      <head>
      <title>No title</title>
      <meta name="generator" content="Namo WebEditor v6.0">
      </head>
      <body bgcolor="white" topmargin="0" marginheight="0">
      <table border="0" align="center" width="780">
      <tr>
      <td width="780" height="382" valign="top"><p align="center"> </p>
      <p align="center">
      <%
      response.Write(msg)
      if not rs.EOF then
      %>
      </p>
      <form name="form1" method="post" action="">
      <table width="100%" border=1 align="center" cellpadding=0 cellspacing=0>
      <tr bgcolor="#CCCCCC">
      <td> </td>
      <td><strong>Prodotto</strong></td>
      <td><strong>Prezzo</strong></td>
      <td><strong>Immagine Articolo</strong></td>
      <td><strong>Offerta o Novità</strong></td>
      <td><strong>Home Page: True=Attivo - False= Non Attivo</strong></td>
      </tr>
      <%while not rs.EOF
      n = n + 1
      %>
      <tr>
      <td width="4%" id="list"><input id=d<%=n%> type=checkbox name=d<%=n%> value="<%=rs.Fields("ProductID")%>">
      </td>
      <td id="list"> <a href='frmproduct.asp?id=<%=rs.Fields("ProductID")%>'><%=rs.Fields("ProductName")%></a></td>
      <td id="list"> <%=rs.Fields("Price")%></td>
      <td id="list"> <a href='/public/catalogo/<%=rs.Fields("image")%>'><%=rs.Fields("image")%></a></td>
      <td id="list"> <%=rs.Fields("image2")%></td>
      <td id="list"> <a href='frmproduct.asp?id=<%=rs.Fields("ProductID")%>'><%=rs.Fields("homepage")%></a></td>
      </tr>
      <%
      rs.MoveNext
      wend
      %>
      <tr>
      <td colspan="6"> <input type="hidden" name="num" value="<%=n%>"> <input id=submit type=submit value=Delete name=submit>
      </td>
      </tr>
      </table>
      </form>
      <p align="center">
      <%
      else
      Response.Write " Non ci sono annunci"
      end if
      rs.Close
      cn.Close
      %>
      </p>
      </td>
      </tr>
      </table>
      </body>
      </html>

      postato in Coding
      M
      massimo.c
    • Aggiornamento campo immagine da record

      Salve ho questo problema, voglio aggiornare un campo immagine (cioè cancellarla se serve tramite una checkbox) da un record di un dbase
      come fare...:sbav:
      posto la pagina di cancellazione del record e in grassetto il campo immagine che vorrei cancellare..

      <<A href="mailto:%@LANGUAGE="VBSCRIPT">%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
      <%
      dim rs
      dim cn
      dim msg

      set cn = server.CreateObject("Adodb.Connection")
      set rs = server.CreateObject("Adodb.Recordset")
      cn.Open conn

      if request.Form("Submit")="Delete" then
      Call Del()
      End if

      Sub Del()
      dim num
      dim i
      dim Total_Del

      num = Request.Form("num")

      for i = 1 to num
      id = Request.Form("d" & i)
      if id<>"" then
      rs.Open "Delete From Products Where ProductID=" & id, cn
      Total_Del = Total_Del + 1
      end if
      next

      msg = Total_Del & " Annunci Cancellati"
      End Sub

      rs.open "Select * From Products", cn
      %>
      <html>
      <head>
      <title>No title</title>
      <meta name="generator" content="Namo WebEditor v6.0">
      </head>
      <body bgcolor="white" topmargin="0" marginheight="0">
      <table border="0" align="center" width="780">
      <tr>
      <td width="780" height="382" valign="top"><p align="center"> </p>
      <p align="center">
      <%
      response.Write(msg)
      if not rs.EOF then
      %>
      </p>
      <form name="form1" method="post" action="">
      <table width="100%" border=1 align="center" cellpadding=0 cellspacing=0>
      <tr bgcolor="#CCCCCC">
      <td> </td>
      <td><strong>Prodotto</strong></td>
      <td><strong>Prezzo</strong></td>
      <td><strong>Immagine Articolo</strong></td>
      <td><strong>Offerta o Novità</strong></td>
      <td><strong>Home Page: True=Attivo - False= Non Attivo</strong></td>
      </tr>
      <%while not rs.EOF
      n = n + 1
      %>
      <tr>
      <td width="4%" id="list"><input id=d<%=n%> type=checkbox name=d<%=n%> value="<%=rs.Fields("ProductID")%>">
      </td>
      <td id="list"> <a href='frmproduct.asp?id=<%=rs.Fields("ProductID")%>'><%=rs.Fields("ProductName")%></a></td>
      <td id="list"> <%=rs.Fields("Price")%></td>
      <td id="list"> <a href='/public/catalogo/<%=rs.Fields("image")%>'><%=rs.Fields("image")%></a></td>
      <td id="list"> <%=rs.Fields("image2")%></td>
      <td id="list"> <a href='frmproduct.asp?id=<%=rs.Fields("ProductID")%>'><%=rs.Fields("homepage")%></a></td>
      </tr>
      <%
      rs.MoveNext
      wend
      %>
      <tr>
      <td colspan="6"> <input type="hidden" name="num" value="<%=n%>"> <input id=submit type=submit value=Delete name=submit>
      </td>
      </tr>
      </table>
      </form>
      <p align="center">
      <%
      else
      Response.Write " Non ci sono annunci"
      end if
      rs.Close
      cn.Close
      %>
      </p>
      </td>
      </tr>
      </table>
      </body>
      </html>

      postato in Coding
      M
      massimo.c
    • RE: Incolonnamento ASP

      Ciao Trikel ho risolto così dopo...una sudata.......:)
      <table align="center" cellpadding="4" cellspacing="4" width="80%">
      <tr>
      <%
      If request.QueryString ("CategoryID") <> "" Then
      cnProvider = "Provider=Microsoft.JET.OLEDB.4.0;"
      cnDataSource = "Data Source = " & server.mappath("/mdb-database/catalogo.mdb")
      Conn = cnProvider & cnDataSource
      Sql = "SELECT * FROM Products where SubCategoryID = " & request.QueryString ("CategoryID") & " Order By ProductID Desc ; "
      Set Visualizza = Server.CreateObject("ADODB.Recordset")
      Visualizza.Open Sql, Conn, 1, 2

      If Visualizza.EOF Or Visualizza.BOF Then
      Response.Write("Non ci sono articoli per la categoria selezionata.")
      Else

      Do While Not Visualizza.EOF
      %>
      <td align="center" width="50%">
      <img src="../public/catalogo/<%=visualizza("image")%> "border="0" alt="" width="100" height="66"><br/>
      <a href="informazioni.asp?cid=<%=Request.QueryString("cid")%>&ProductID=<%=Visualizza("ProductID")%>" target="_parent"><%= Visualizza("ProductName")%>
      </a>
      </td>
      <%
      Conta = Conta + 1

      if Conta = 2 then ' Quando la nostra variabile arriva 2 colonne
      Conta = 0
      response.write "</tr><tr>"
      end if

      Visualizza.movenext
      loop
      Visualizza.Close
      Set Visualizza = Nothing
      End If
      End If
      %>
      </tr>
      </table>

      @trykel said:

      puoi copiare l'errore ?

      grazie.

      postato in Coding
      M
      massimo.c
    • RE: Incolonnamento ASP

      Azzi..purtroppo non funziona....mi viene restituito un erroe interno al server, non è che posso decidere io in quante colonne fare visualizzare la mia pagina....

      @trykel said:

      Ho tralasciato tutta la parte precedente a:

      >Do While Not Visualizza.EOF
      
      >```
      perchè non necessita modifiche.
       
      la parte mancante è:
      

      <%
      If request.QueryString ("CategoryID") <> "" Then
      cnProvider = "Provider=Microsoft.JET.OLEDB.4.0;"
      cnDataSource = "Data Source = " & server.mappath("/mdb-database/catalogo.mdb")
      Conn = cnProvider & cnDataSource
      Sql = "SELECT * FROM Products where SubCategoryID = " & request.QueryString ("CategoryID") & " Order By ProductID Desc ; "
      Set Visualizza = Server.CreateObject("ADODB.Recordset")
      Visualizza.Open Sql, Conn, 1, 2

      If Visualizza.EOF Or Visualizza.BOF Then
      Response.Write("Non ci sono articoli per la categoria selezionata.")
      Else
      %>

      ciao.

      postato in Coding
      M
      massimo.c
    • RE: Incolonnamento ASP

      Ok ho visto,
      però così come è non funziona in quanto manca tutta la parte SQL dove dovrei posizionarla?

      @trykel said:

      Potresti utilizzare le tabelle HTML.
      [html]
      <table width="100%">
      <%
      Do While Not Visualizza.EOF
      %>
      <tr><td>
      <a href="informazioni.asp?cid=<%=Request.QueryString( "cid")%>&ProductID=<%=Visualizza("ProductID")% >" target="_parent"><%= Visualizza("ProductName")%>
      <br>
      <img src="../public/catalogo/<%=visualizza("image")%> "border="0" alt="" width="100" height="66">
      </a></td>
      <%
      Visualizza.MoveNext
      If Visualizza.EOF then
      %>
      <td></td></tr>
      <%
      exit loop //non uso classic ASP non sono certo si esca con exit loop
      end if
      %>
      <td>
      <a href="informazioni.asp?cid=<%=Request.QueryString( "cid")%>&ProductID=<%=Visualizza("ProductID")% >" target="_parent"><%= Visualizza("ProductName")%>
      <br>
      <img src="../public/catalogo/<%=visualizza("image")%> "border="0" alt="" width="100" height="66">
      </a></td>
      </tr>
      <%
      Visualizza.MoveNext
      Loop

      Visualizza.Close
      Set Visualizza = Nothing
      End If
      End If
      %>
      </table>
      [/html]

      la struttura HTML è la seguente:
      [html]
      <table width="100%">
      <tr>
      <td> testo <BR> foto</td>
      <td> testo <BR> foto</td>
      </tr>
      </table>
      [/html]

      ciao.

      postato in Coding
      M
      massimo.c
    • Incolonnamento ASP

      Buon giorno a tutti ed un grazie a chi mi potrà aiutare, io dovrei mettere su due colonne la risultanza di questa pagina asp cioè vorrei che il testo apparisse appena sotto la immagine e che fossero incolonnati per 2.. posto il codice:
      <%
      If request.QueryString ("CategoryID") <> "" Then
      cnProvider = "Provider=Microsoft.JET.OLEDB.4.0;"
      cnDataSource = "Data Source = " & server.mappath("/mdb-database/catalogo.mdb")
      Conn = cnProvider & cnDataSource
      Sql = "SELECT * FROM Products where SubCategoryID = " & request.QueryString ("CategoryID") & " Order By ProductID Desc ; "
      Set Visualizza = Server.CreateObject("ADODB.Recordset")
      Visualizza.Open Sql, Conn, 1, 2

      If Visualizza.EOF Or Visualizza.BOF Then
      Response.Write("Non ci sono articoli per la categoria selezionata.")
      Else

      Do While Not Visualizza.EOF
      %>
      <a href="informazioni.asp?cid=<%=Request.QueryString("cid")%>&ProductID=<%=Visualizza("ProductID")%>" target="_parent"><%= Visualizza("ProductName")%>
      <img src="../public/catalogo/<%=visualizza("image")%> "border="0" alt="" width="100" height="66">
      </a>
      <%
      Visualizza.MoveNext
      Loop

      Visualizza.Close
      Set Visualizza = Nothing
      End If
      End If
      %>

      Grazie mille..
      Massimo

      postato in Coding
      M
      massimo.c
    • RE: [ASP] Problemi richiamo sottocategorie per scrittura su dbase

      Ciao Pao grazie del benvenuto...
      praticamente mi trovo a dovere a richiamare in un form una colonna di categorie da un dbase e di conseguenza le sottocategorie, ho adattato questo script però quando scelgo la categoria mi ricarica si la sottocategoria corretta ma non la categoria corrispondente

      <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
      <!--#include file="dinselclass.asp"-->
      <%
      cat = request("category")
      subcat = request("subcategory")
      %>
      <html>
      <head>
      <title>Select dinamiche</title>
      <script language="JavaScript">
      <!--
      function aggiorna_category(){

      document.inserimento_prodotti.subcategory.value = "";
      document.inserimento_prodotti.submit();
      }
      function aggiorna_subcategory(){

      document.inserimento_prodotti.subcategory.value = "";
      document.inserimento_prodotti.submit();
      }
      function submit_finale(){
      var check;
      check="true";
      if (check=="true") {
      if ((document.inserimento_prodotti.category.value=="Scegli una categoria")||(document.inserimento_prodotti.subcategory.value=="--"))
      {
      alert("Tutti i campi devono essere selezionati!");
      check="false";
      }
      }

      if (check=="true") {
      document.inserimento_prodotti.action="risultato.asp";
      document.inserimento_prodotti.submit();
      }
      }
      //-->
      </script>
      </head>
      <body>

      <br/><br/><br/><br/>
      <center>
      <table border="0" cellpadding="0" cellspacing="0" width="100%">
      <form name="inserimento_prodotti" method="post">
      <tr>
      <td align="right">
      Lista dinamica categorie   
      </td>
      <td align="left">

      <%
      set dinselectregioni = new DinamicSelect
      dinselectregioni.DataBase = "catalogo.mdb"

      if len(reg) > 0 then
      dinselectregioni.selected = cat
      else
      dinselectregioni.selected = "Scegli una categoria"
      end if

      dinselectregioni.sql = "select * from Productcategories"
      dinselectregioni.SelectValue = "CategoryID"
      dinselectregioni.SelectText = "CategoryName"
      dinselectregioni.evento = "onChange='aggiorna_category();'"
      dinselectregioni.NomeCampo = "category"
      dinselectregioni.CreaDinamicSelect()
      %>
      </td>
      </tr>
      <tr><td colspan="2"><br/><br/></td></tr>
      <tr>
      <td align="right">
      Lista dinamica sottocat    
      </td>
      <td align="left">
      <%
      set dinselectprovincie = new DinamicSelect
      dinselectprovincie.DataBase = "catalogo.mdb"

      response.Write("ciao")
      response.Write(cat)

      dinselectprovincie.sql = "select CategoryName from ProductSubCategories where ProductSubCategories.CategoryID='"&cat&"'"

      dinselectprovincie.selected = subcat

      dinselectprovincie.SelectValue = "CategoryName"
      dinselectprovincie.SelectText = "CategoryName"
      dinselectregioni.evento = "onChange='aggiorna_subcategory();'"
      dinselectprovincie.NomeCampo = "subcategory"
      dinselectprovincie.CreaDinamicSelect()
      %>
      </td>
      </tr>

      <tr><td colspan="2"><br/><br/></td></tr>
      <tr><td colspan="2"><br/><br/></td></tr>
      <tr>
      <td colspan="2" align="center">  
      <input type="button" value="Conferma" onClick="javascript: submit_finale();"/>

      </td>
      </tr>
      </form>

      </table>
      </center>
      </body>
      </html>

      postato in Coding
      M
      massimo.c
    • [ASP] Problemi richiamo sottocategorie per scrittura su dbase

      Salve nel dbase con le seguenti tabelle:
      1: Products (dove si memorizzano i prodotti) costituita dai campi: ProductId, ProductName,Details, Price,Image,Homepage,SubCategoryID.
      2: ProductCategories (elenco di categorie principali) costituita dai campi CategoryId e CategoryName
      3: ProductSubCategories (elenco delle sottocategorie ognuna della quali legata a una categoria) costitutita dai campi ID CategoryID e CategoryName.
      La ProductSubCategories la richiamo anche per la costituzione del menù dinamico delle sottocategorie.
      In pratica ho una select con le categorie nel mentre selezioni una categoria vorrei che si recuperino tutte le sub-categorie per quella categoria così che possa selezionare solo tra quelle.
      Chiaramente compliato il form tutto dovrebbe essere salvato.....
      posto il codice del form di inserimento dal quale mi risulta sempre un errore interno al server, devo dare qualche altra info...?
      qualcuno può aiutarmi?
      p.s. ho ingrassetto le parti dubbie...

      <...cutted by paocavo>

      postato in Coding
      M
      massimo.c