Visualizzazione dei risultati da 1 a 3 su 3

Discussione: Modificare file testo

  1. #1
    Utente di HTML.it
    Registrato dal
    Feb 2005
    Messaggi
    58

    Modificare file testo

    Buon giorno,

    Ho un file di testo con 5 righe di testo.

    Avrei bisogno che l'utente tramite una pagina asp , visualizza un form con le righe del file e possa modificare il file di testo.

    Mi potete aiutare ?

  2. #2
    Utente di HTML.it
    Registrato dal
    Feb 2005
    Messaggi
    58
    scusate, ho modificato la cosa e non uso piu un file di testo ma un DB.

    VI CHIEDO:

    Tramite una form , con lo script che invio, listo i record presenti.L'utente dovrebbe poter modificare i records a piacere e tramite INVIA effettuare le modifiche.
    E' possibile modificare piu record contemporaneamente.?

    <% if Request("B1")= "Invia" then
    dim piatto,euro
    piatto=Request.Form("piatto")
    euro=Request.Form("euro")

    dim up
    up="SELECT * FROM piatto "

    dim rsup
    Set rsup = Server.CreateObject("ADODB.Recordset")
    rsup.Open up, conn,3,3


    Rsup("piatto") =request.form("piatto")
    Rsup("euro") = request.form("euro")


    Rsup.Update

    rsup.close
    set rsup=Nothing

    else
    %>



    <form method="POST" action="prova.asp" name="frmMain">
    <%
    dim sql
    sql="SELECT * FROM PIATTO "
    dim rs
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open sql, conn%>
    <p align="center">

    <%
    Do While Not rs.EOF
    %>
    <input type="hidden" name="ID" value="<% =RS("ID") %>">
    <input type="text" name="piatto" value="<%=rs("piatto")%>">
    <input type="text" name="euro" value="<%=rs("euro")%>">

    <%rs.MoveNext
    loop%>

    <%
    rs.close
    set rs = nothing
    %>
    <input type="submit" value="Invia" name="B1" >
    </form>
    <%end if
    conn.close
    set conn=nothing%>

  3. #3
    Utente di HTML.it L'avatar di agenti
    Registrato dal
    Feb 2002
    Messaggi
    2,427
    codice:
    <% if Request("B1")= "Invia" then
    dim piatto,euro
    piatto=Request.Form("piatto")
    euro=Request.Form("euro")
    
    dim up
    up="UPDATE piatto SET piatto = '"&request.form("piatto")&"', euro =  '"&request.form("euro")&"' "
    conn.execute (up)
    
    else
    
    response.write "parametri non corretti"
    end if
    
    %>

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 © 2026 vBulletin Solutions, Inc. All rights reserved.