Accedere a MySQL con RM/COBOL

Altre pagine:	1] MySQL	4] Gestione completa dei dati
	2] Preparazione	5] Le eccezioni
	3] Replica dati in MySQL	6] Accedere i dati

Accedere ai dati di MySQL.

Dopo aver memorizzato i nostri dati di RM/COBOL in un database di MySQL, ecco alcuni modi per potervi accedere con programmi non Cobol.

Dapprima dovremo aver installato il driver ODBC correttamente configurato.

Accesso tramite MS Excel

Dal menu Dati sceglieremo Importa dati esterni e Nuova query su database.

Accesso a MySQL da Excel

Ora sceglieremo l'origine dei dati il cui nome corrisponde a quello assegnato ad driver ODBC per MySQL.
Nel nostro esempio sarà RMC-MY-ODBC

Accesso a MySQL da Excel

Da questa finestra sceglieremo i campi i quali dovranno figurare nella tabella Excel.
Nell' esempio ho scelto i campi nome e citta.

Accesso a MySQL da Excel

Dopo qualche click apparirà la nostra tabella Excel.

Accesso a MySQL da Excel

Pubblicare i dati in una pagina web tramite ASP

Mi limito ad indicare quanto necessita per visualizzare la tabella.

<html>
<head>
<title>Indirizzi</title>
</head>

<%
Dim Conn 
Dim rs 
Dim strSQL 
%>

<body>
<h1>Elenco indirizzi</h1>

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set rs   = server.createobject("ADODB.Recordset")

Conn.Open "RMC-MY-ODBC","RM-MY","rmc"

strSQL = "SELECT * FROM indirizzi ; "
Set rs = Conn.Execute(strSQL)

%>
<table border="1" cellpadding="1" cellspacing="1">
<tr>
<th>Numero</th>
<th>Cognome e nome</th>
<th>Via</th>
<th>Città</th>
<th>Nazione</th>
</tr>

<%
Do While Not rs.EOF
%>
<tr>
<td><%=rs.Fields("Numero").value %></td>
<td><%=rs.Fields("Nome").value %></td>
<td><%=rs.Fields("Via").value %></td>
<td><%=rs.Fields("Citta").value %></td>
<td><%=rs.Fields("Nazione").value %></td>


<%
rs.MoveNext
Loop

%>
</tr>
</table>

<%
rs.Close
Set rs   = Nothing
Conn.Close
Set Conn = Nothing
%>

</body>
</html>

Ecco la tabella visualizzata nel browser.

Accesso a MySQL da Excel

Come prelevare questi codici

Pagina precedente

Cobol in pratica

Accedere ai dati di MySQL.

Accesso tramite MS Excel

Pubblicare i dati in una pagina web tramite ASP