Ecco qua il codice inserito:
chiaramente non funziona ... č la prima volta che aggiungo una record ad un database quindi ho fatto riferimento ad uno giā esistente ...ma certe cose le ho inserite e/o modificate alla cieca senza sapere esattamento quello che facevo ... grazie per qualsiasi aiuto!codice:<% Date = Replace(request("Date"),"'", "''") TpRec = N Km = Replace(request("Km"),"'", "''") Fornitore = Replace(request("Fornitore"),"'", "''") Descrizione = Replace(request("Descrizione"),"'", "''") pagatodamauro = Replace(request("pagatodamauro"),"'", "''") pagatodaale = Replace(request("pagatodaale"),"'", "''") pagatodamirko = Replace(request("pagatodamirko"),"'", "''") StrConnessione = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/mdb-database") & "\***.mdb;pwd=***" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open StrConnessione SQL = "SELECT * FROM SpAttive" SQL = SQL & " values ('" & TpRec & "','" & Date & "','" & Km & "','" & Descrizione & "', '" & Fornitore & "','" & pagatodamauro & "','" & pagatodaale & "', '" & pagatodamirko & "')" Conn.execute SQL Conn.Close set Conn=nothing %>
Mirko

Rispondi quotando