Ecco una piccola guida per collegare un database Access utilizzando ASP.
Detto in modo poco tecnico, ci sono 4 tipi di collegamento principale:
»apertura della tabella di un database;
»Inserire dati in una tabella di un database;
»Aggiornare i dati in una tabella di un data base;
»Cancellare i dati in una tabella di un database.
Come prima cosa dobbiamo collegare il nostro database, per cui la stringa sarà la seguente:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Mode = 3
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath ("NOME DEL DATABASE.mdb")
%>
Una volta aperto possiamo estrarre i dati dal nostro data base, la stringa da aggiungere sarà:
<%
sql = "SELECT * FROM nome tabella ORDER by Inserisci il nome del campo per effettuare l'ordine dalla a alla z ASC "
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open sql, conn ,3,3
%>
Se invece volessi inserire dei dati all'interno di un data base, la stringa sarebbe:
<%
sql = "INSERT into nome tabella (campo1, campo2,.........campoultimo) VALUESvalore1,valore2,.....valoreultimo)"
Conn.execute(sql)
%>
attenzione, valore1.ultimo deve essere messo fra '"&se alfanumerico&"', "&se numerico&",#"&se data&"#.
Se invece volessi modificare dei dati all'interno di un data base, la stringa sarebbe:
<%
SQL = "SELECT * FROM nome tabella where (qui devi mettere il richiamo per la cella da modificare) "
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open SQL, Conn,3,3
Rs("nome del campo da modificare") =(metti il risultato del campo che modifica)
Rs.update
Rs.Close
Set Rs = Nothing
Conn.close
Set Conn=nothing
%>
Se invece volessi cancellare dei dati all'interno di un data base, la stringa sarebbe:
<%
sql = "Delete from nome tabella where (qui devi mettere il richiamo per la cella da cancellare)
Conn.execute(sql)
%>