Ciao a tutti,
dovrei realizzare in VBScript una connessione ad un Database Oracle.
Solitamente mi collega ad esso tramite Oracle SQL Developer, per il quale ho i seguenti dati:
- username
- password
- hostaname
- porta
- servicename
Come faccio a realizzare una connessione in VBScript?
Ho visto che tutti gli esempi richiedono un DataBase o InitalDataBase...
Grazie.
Ciao Marino,
ho provato a seguire i tuoi consigli, ma non sono arrivato ad una soluzione.
Ho scritto il seguente codice:
codice:Function ConnectionTest() Const DB_CONNECT_STRING = "Provider=sqloledb;Data Source=myServiceName\myHostname,myport;User Id=myUsername;Password=myPassword;" Set myConn = CreateObject("ADODB.Connection") Set objRecordSet = CreateObject("ADODB.Recordset") myConn.Open DB_CONNECT_STRING objRecordSet.Open myQuery, myConn Wscript.Echo objRecordSet.fields.item(1) & " " & objRecordSet.fields.item(2) myConn.Close End function Call ConnectionTest()
Se provo a eseguirlo da un'istanza DOS ottengo il seguente errore:
Microsoft OLE DB Provider for SQL Server: [DBNETLIB][ConnectionOpen <Connect<>>.] Specified SQL server not found.
Dove potrebbe essere l'errore?
Grazie.
L'errore ce l'hai davanti:Originariamente inviata da exFelino
Se provo a eseguirlo da un'istanza DOS ottengo il seguente errore:
Microsoft OLE DB Provider for SQL Server: [DBNETLIB][ConnectionOpen <Connect<>>.] Specified SQL server not found.
Dove potrebbe essere l'errore?
Specified SQL server not found
vedi questo:
http://www.connectionstrings.com/oracle/
Ho provato diverse combinazioni, ho anche guardato in precedenza il link da te segnalato ma senza esiti.
Visto che non trovo il Server SQL, l'errore riguarda il Data Source?
Grazie.
Vedo che non hai capito, allora te lo indico esplicitamente:
tu cerchi di connetteri ad un database Oracle usando il provider di SQL Server: sqloledb.
Ok,
ma tra le varie possibili stringhe di connessione ho provato questa:
con il seguente errore:codice:Data Source=(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=MyHost)(PORT=MyPort))(CONNECT_DATA=(SERVICE_NAME=MyOracleSID)));User Id=myUsername;Password=myPassword;
Microsoft OLE DB Provider for ODBC Drivers: [Microsoft][ODBC Driver Manager] Data Source name too long
quella di sotto è una vecchia pagina asp.
Bisogna entrare nel sito oracle, scaricare l'ODAC e installarlo. Io ho sia quello a 64bit sia quello a 32 per visual studio.
Questo è il codice (vbscript)
codice:<% option explicit dim db, rs, sql set db = server.CreateObject("ADODB.Connection") set rs = server.CreateObject("ADODB.RECORDSET") %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" > <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Connessione oracle (asp)</title> <link href="StyleSheet.css" rel="stylesheet" type="text/css" /> </head> <body> <h3>ASP</h3> <% db.Open("Provider=OraOLEDB.Oracle.1;Persist Security Info=True;User ID=pietro;Password=0000;Data Source=XE") sql = "select * from regioni " rs.Open sql, db if rs.EOF then rs.Close: set rs = nothing db.Close: set db = nothing response.End else %> <div class="professionale_2"> <table cellspacing="0" cellpadding="3" rules="all" bordercolor="#CCCCCC" border="1" style="background-color:White;border-color:#CCCCCC;border-width:1px;border-style:Solid;border-collapse:collapse;"> <tr style="color:White;background-color:#006699;font-weight:bold;"> <td>id_regione</td> <td>nome_regione</td> <th>codice_istat_regione</th> </tr> <% do while not rs.EOF %> <tr style="color:#000066;"> <td><%=rs("id_regione")%></td> <td><%=rs("nome_regione")%></td> <td><%=rs("codice_istat_regione")%></td> </tr> <% rs.MoveNext loop response.Write "</table></div>" end if rs.Close: set rs = nothing db.Close: set db = nothing %> </body> </html>
Ultima modifica di pietro09; 10-12-2015 a 21:47
Pietro
Permessi di invio
Rispondi quotando