![]() |
VBScript Sample: vbscript/ado/publishers/default.asp |
|
||||||
|
||||||||
<%@ Language=VBScript %> <HTML> <HEAD> <TITLE>Publishers Example</TITLE> <% dim path,dbpath,pos path = Server.mappath("default.asp") path = replace(path, "\", "/") pos = InStr(1,path,"vbscript") dbpath = Left(path,pos - 1) & "database/CloudscapeDB" drvIdx = Request.QueryString("drvtxt") dim DrvArry(15) '(17) DrvArry(0) = "--Please select a driver--" DrvArry(1) = "sun.jdbc.odbc.JdbcOdbcDriver (Access)" DrvArry(2) = "sun.jdbc.odbc.JdbcOdbcDriver (SQLServer)" DrvArry(3) = "oracle.jdbc.driver.OracleDriver (Oracle)" DrvArry(4) = "com.informix.jdbc.IfxDriver (Informix)" DrvArry(5) = "twz1.jdbc.mysql.jdbcMysqlDriver (MySQL)" DrvArry(6) = "org.gjt.mm.mysql.Driver (MySQL)" DrvArry(7) = "com.sybase.jdbc2.jdbc.SybDriver (Sybase)" DrvArry(8) = "COM.cloudscape.core.JDBCDriver (Cloudscape)" DrvArry(9) = "postgresql.Driver (Postgres)" DrvArry(10) = "intersolv.jdbc.sequelink.SequeLinkDriver (Oracle)" DrvArry(11) = "intersolv.jdbc.sequelink.SequeLinkDriver (Informix)" DrvArry(12) = "intersolv.jdbc.sequelink.SequeLinkDriver (Sybase)" DrvArry(13) = "intersolv.jdbc.sequelink.SequeLinkDriver (SQLServer)" DrvArry(14) = "intersolv.jdbc.sequelink.SequeLinkDriver (Access)" DrvArry(15) = "openlink.jdbc2.Driver (SQLServer)" %> </HEAD> <BODY bgcolor=silver> <font size="4" face="Arial, Helvetica"> <b>BLOB of LONG VARCHAR Database Sample</b></font><br> <hr size="1" color="#000000"><p> <form name=form1 action="publishers.asp?direction=0" method=post> <table align=center border=0 cellPadding=2 cellSpacing=0 width=90%> <tr><td><strong>Dirver:</strong></td> <td><select name=drvtxt onchange="drvtxt_onChange()"> <%for i=0 to ubound(DrvArry) if i = drvIdx then%> <OPTION value=<%=i%> selected><%=DrvArry(i)%></OPTION> <%else%> <OPTION value=<%=i%>><%=DrvArry(i)%></OPTION> <%end if%> <%next%> </select> <input type=button name=OpenDB value="Open Database" onclick="return openCnn_onclick();"> </td> </tr> <tr><td><strong>Url:</strong></td> <td><input type=text name=urltxt size=80 value=""></td> </tr> <tr><td><strong>User ID:</strong></td> <td><input type=text name=uidtxt size=80 value=""></td> </tr> <tr><td><strong>Password:</strong></td> <td><input type=password name=pwdtxt size=80 value=""></td> </tr> </table> </form> <hr size="1" color="#000000"><p> <P> <table width=90% border=1 cellspacing=0> <tr><td><b>Driver:</b></td><td><b>Database:</b></></tr> <tr><td>sun.jdbc.odbc.JdbcOdbcDriver</td><td>Access, SQL Server</></tr> <tr><td>oracle.jdbc.driver.OracleDriver</td><td>Oracle</></tr> <tr><td>com.informix.jdbc.IfxDriver</td><td>Informix</></tr> <tr><td>twz1.jdbc.mysql.jdbcMysqlDriver</td><td>MySQL</></tr> <tr><td>org.gjt.mm.mysql.Driver</td><td>MySQL</></tr> <tr><td>com.sybase.jdbc2.jdbc.SybDriver</td><td>Sybase</></tr> <tr><td>COM.cloudscape.core.JDBCDriver</td><td>Cloudscape</></tr> <tr><td>postgresql.Driver</td><td>Postgre</></tr> <tr><td>intersolv.jdbc.sequelink.SequeLinkDriver</td><td>Oracle, Informix, Sybase, SQL Server, MS Access</></tr> <tr><td>openlink.jdbc2.Driver</td><td>SQL Server</></tr> </table></P> </BODY> </HTML> <script language=JavaScript> function openCnn_onclick(){ if (document.form1.drvtxt.selectedIndex == 0){ alert("Please select a driver for open database!"); return; } document.form1.submit(); } function drvtxt_onChange(){ switch ( document.form1.drvtxt.selectedIndex ){ case 0: document.form1.urltxt.value = ""; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 1: document.form1.urltxt.value = "{jdbc:odbc:AccessDB}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 2: document.form1.urltxt.value = "{jdbc:odbc:SQLServerDB}"; document.form1.uidtxt.value = "sa"; document.form1.pwdtxt.value = ""; break; case 3: document.form1.urltxt.value = "{jdbc:oracle:thin:@<HostIP>:1521:<SID>}"; document.form1.uidtxt.value = "HALCYON"; document.form1.pwdtxt.value = "HALCYON"; break; case 4: document.form1.urltxt.value = "{jdbc:informix-sqli://<HostIP>:1526/InformixDB:informixserver=kingdbsvr;user=informix;password=miss}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 5: document.form1.urltxt.value = "{jdbc:z1MySQL://<HostIP>:3306/MySQLDB}"; document.form1.uidtxt.value = "root"; document.form1.pwdtxt.value = ""; break; case 6: document.form1.urltxt.value = "{jdbc:mysql://<HostIP>:3306/MySQLDB}"; document.form1.uidtxt.value = "root"; document.form1.pwdtxt.value = ""; break; case 7: document.form1.urltxt.value = "{jdbc:sybase:Tds:<HostIP>:5000/SybaseDB}"; document.form1.uidtxt.value = "sa"; document.form1.pwdtxt.value = ""; break; case 8: document.form1.urltxt.value = "{jdbc:cloudscape:<%=dbpath%>}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 9: document.form1.urltxt.value = "{jdbc:postgresql://<HostIP>:5432/PostgresDB}"; document.form1.uidtxt.value = "postgres"; document.form1.pwdtxt.value = "post"; break; case 10: document.form1.urltxt.value = "{jdbc:sequelink://<HostIP>:4003/[Oracle];OSUser=john;OSPassword=whatever}"; document.form1.uidtxt.value = "HALCYON"; document.form1.pwdtxt.value = "HALCYON"; break; case 11: document.form1.urltxt.value = "{jdbc:sequelink://<HostIP>:4004/[Informix];Database=InformixDB;OSUser=john;OSPassword=whatever}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 12: document.form1.urltxt.value = "{jdbc:sequelink://<HostIP>:4005/[Sybase];Database=SybaseDB;OSUser=john;OSPassword=whatever}"; document.form1.uidtxt.value = "sa"; document.form1.pwdtxt.value = ""; break; case 13: document.form1.urltxt.value = "{jdbc:sequelink://<HostIP>:4006/[SQLServer];Database=SQLServerDB;OSUser=john;OSPassword=whatever}"; document.form1.uidtxt.value = "sa"; document.form1.pwdtxt.value = ""; break; case 14: document.form1.urltxt.value = "{jdbc:sequelink://<HostIP>:4011/[ODBC MS Access];Database=c:\\database\\AccessDB.mdb;}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 15: document.form1.urltxt.value = "{jdbc:openlink://<HostIP>/DSN=SQLServerDB/UID=sa/PWD=}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 16: document.form1.urltxt.value = "{jdbc:msql://<HostIP>:1114/MiniSQLDB}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 17: document.form1.urltxt.value = "{jdbc:solid://<HostIP>:<port>/<UID>/<PWD>}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; break; case 18: document.form1.urltxt.value = "{jdbc:dbaw://< Host IP >:8889/MS_ACCESS/BIBLIO/BIBLIO}"; document.form1.uidtxt.value = ""; document.form1.pwdtxt.value = ""; } } </SCRIPT> |
||||||||
|
||||||||
Copyright © 1998-2002, Halcyon
Software Inc. All rights reserved.
|