数据库联接大全
 
http://www.connectionstrings.com/
 

 

 使用Junit测试数据库联接
 

 2007-04-13 13:05
 
 
    

     在mysql中建立数据库demo
首先建立一个简单的数据库连接类 基于mysql
ConMysql.java
import java.sql.Connection;
import java.sql.DriverManager;

public class ConMysql {
    public ConMysql() {

    }

    private Connection conn = null;
    private String url = "jdbc:mysql://localhost:3306/demo";
    private String user = "root";

    public Connection conn() {
        try {
            Class.forName("org.gjt.mm.mysql.Driver").newInstance();
            conn = DriverManager.getConnection(url, user, "");
            return conn;
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }
}

测试数据连接

import junit.framework.TestCase;
import java.sql.*;

public class TestDb extends TestCase {

    public TestDb(String name) {
        super(name);
    }

    /*
    * “com.test.ConMysql.ConMysql()”的测试方法
    */
    public void testConMysql() {
        ConMysql con = new ConMysql();
        Connection c = con.conn();
        try {
            Statement stmt = c.createStatement();
            String sql = "insert into customer values('1','a','M','nn')";
            stmt.executeUpdate(sql);
            assertNotNull(stmt.executeQuery("select * from customer"));
            assertEquals(1, stmt.executeQuery("select count(*) from customer"));

        } catch (SQLException e) {
            // TODO 自动生成 catch 块
            e.printStackTrace();
        }

    }

    
 
  

我现在用VB写一段C/S结构的程序.我把程序写到模块中,但是如何在程序中读取数据库中的东西了?联接代码如下:
public con as new connect....
Sub main()
    Dim str As String
    connact=server.CreateObject("adodb.connection")
   connact.ConnectionString = "provider=sqloledb.1;data source=huacai12.;initial catalog=test;user id=sa;password=sa；database=数据库名"
    '这是SQL的连接方式
    Con.Open 
    frmLogin.Show
End Sub
我现在要用一个文本框实现查询数据库功能.是用一个什么样的语句来执行这个功能.

PB应用的数据库联接的安全防范
 
（加入日期:2001-8-15）
 
【保存文章至硬盘】【打印文章】【字体：大中 小】
 
 
 
 分享到： 
 
 
 
 
 0
 

 　　随着因特网的深入人心，网络技术不断发展，数据的保密性要求也越来越高。在通常的Server/Client方式MIS开发中，由于程序要与数据库服务器保持联接，为了程序的灵活和扩充性，联接参数（用户ID和登录口令）又不能在程序中写死（其实写死也不是一种好的方法），一般的方法无外乎有两种：其一是把联接参数存放在注册表中；其二就是直接读INI文件。
 
 而综上几种方法安全性都不太好，给人以可乘之机。 
 
 本人找到一种方法，可以解决数据库应用的安全性问题，通过INI文件和数据库的巧妙处理，在程序中提供用户一种接口，可以随时修改数据库的联接参数，而又不给外人以蛛丝马迹，做到神不知鬼不觉。
 
 实现方法如下： 
 
 1、创建INI文件，记录数据库联接的一些方便程序分发的参数DBMS、SERVERNAME、LOGID具体如下： 
 
 //创建成INI文件（rsgl.ini） 
 
 [Database] 
 
 DBMS=O84 ORACLE 8.0.4 
 
 ServerName=gxmistest //数据库服务器名 
 
 LogId=rsgl //实际的数据库登录用户 
 
 然后，在数据库中创建一个中间用户PUB，登录口令PUB，赋予PUB用户CONNECT，RESOURCE权限，再在其中创建表CREATE TABLE TBL_PUB_PASSSHADOW (PASSSHADOW VARCHAR2(50) NOT NULL)用于存放实际的数据库联接的登录口令（当然要经过加密）。加密函数网上多的是，在此就不累述。我自已创建了一个字符串加密函数f_password(string old_str,string new_str,integer jm_mode)，jm_mode参数用以区分函数的加（解）密，old_str、new_str两参数分别为加（解）密的字符串。
 
 2、就开始编写应用程序了，在应用程序的OPEN事件中进行数据库登录联接，程序脚本如下： 
 
 string ls_inifile,ls_starttimes 
 
 string ls_logid,ls_logpass,ls_dbms 
 
 string ls_pass,ls_sql,ls_code,ls_server 
 
 //设置INI文件 
 
 ls_inifile = 'rsgl.ini' 
 
 ls_server = ProfileString (ls_inifile, "database", "ServerName", "") 
 
 ls_logid = ProfileString (ls_inifile, "database", "LogId","") 
 
 // Profile pub 
 
 SQLCA.DBMS = ProfileString (ls_inifile, "database", "dbms", "") 
 
 SQLCA.LogPass = 'pub' 
 
 SQLCA.ServerName = ls_server 
 
 SQLCA.LogId = "pub" 
 
 SQLCA.AutoCommit = False 
 
 SQLCA.DBParm = "" 
 
 connect using sqlca; 
 
 //得到用户RSGL加过密的用户口令 
 
 select passshadow into:ls_pass from tbl_pub_passshadow; 
 
 //口令解密 
 
 ls_pass = f_password(ls_pass,0) 
 
 disconnect using sqlca; 
 
 //联接到实际的数据库用户RSGL 
 
 SQLCA.ServerName = ls_server 
 
 sqlca.DBMS = ProfileString (ls_inifile, "database", "Dbms","") 
 
 SQLCA.DBParm = ProfileString (ls_inifile, "database", "Dbparm","") 
 
 sqlca.database = ProfileString (ls_inifile, "database", "database","") 
 
 sqlca.userid = ProfileString (ls_inifile, "database", "userid","") 
 
 sqlca.dbpass = ProfileString (ls_inifile, "database", "dbpass","") 
 
 sqlca.logid = ls_logid 
 
 sqlca.logpass = ls_pass//ProfileString (ls_inifile, "database", "LogPass","") 
 
 SQLCA.AutoCommit = False 
 
 connect using sqlca; 
 
 if sqlca.sqldbcode <> 0 then 
 
 choose case sqlca.sqldbcode 
 
 case 1017 
 
 MessageBox (string(sqlca.SQLDBCode),"不能联接数据库。~r错误：无效的用户名和口令.请与管理员联系!") 
 
 case 12154 
 
 MessageBox (string(sqlca.SQLDBCode),"不能联接数据库。~r错误：服务器名不存在!请与系统管理员联系.") 
 
 case 999 
 
 MessageBox (string(sqlca.SQLDBCode),"不能联接数据库。~r错误：数据库不支持你当前的安装!") 
 
 case else 
 
 MessageBox (string(sqlca.SQLDBCode),"不能联接数据库。~r错误："+ sqlca.sqlerrtext) 
 
 end choose 
 
 halt close 
 
 else 
 
 open(w_gd_frame) //打开应用程序的主窗口 
 
 end if 
 
 3、接下来，就是编写一个用户接口，让授权用户随时修改数据库联接参数。窗口界面见下图：（文件名称：dblogon.jpg）,窗口上面的控件有： 
 
 
 
 
 
 控件名称 控件属性 
 
 sle_server SingleLineEdit 
 
 sle_login SingleLineEdit 
 
 sle_oldkl SingleLineEdit 
 
 sle_pass SingleLineEdit 
 
 sle_repass SingleLineEdit 
 
 cb_1 commandbutton 
 
 cb_2 commandbutton 
 
 cb_1命令按钮的clicked事件如下： 
 
 string ls_inifile,ls_pass,ls_logid,ls_repass,ls_old 
 
 string ls_k,ls_user,ls_sql 
 
 ls_inifile ='rsgl.ini' 
 
 transaction pub_tr 
 
 pub_tr = create transaction 
 
 pub_tr.DBMS = ProfileString (ls_inifile, "database", "dbms", "") 
 
 pub_tr.LogPass = 'pub' 
 
 pub_tr.ServerName = sle_server.text 
 
 pub_tr.LogId = "pub" 
 
 pub_tr.AutoCommit = False 
 
 pub_tr.DBParm = "" 
 
 connect using pub_tr; 
 
 ls_old = sle_oldkl.text 
 
 ls_user = lower(trim(sle_logid.text)) 
 
 //得到数据库联接原用户口令 
 
 select passshadow into :ls_k from tbl_pub_passshadow using pub_tr; 
 
 if ls_old <> f_password(ls_k,0) then 
 
 messagebox("提示","原口令不对!") 
 
 return 
 
 end if 
 
 //检查核对口令 
 
 ls_pass = sle_pass.text 
 
 ls_repass = sle_repass.text 
 
 if ls_repass <> ls_pass then 
 
 messagebox("","核对口令不对，请重新输入!") 
 
 return 
 
 end if 
 
 SetProfileString(ls_inifile, "Database", "Servername",sle_server.text) 
 
 SetProfileString(ls_inifile, "Database", "Logid",ls_user) 
 
 //修改数据库用户的联接口令 
 
 ls_sql = ' alter user '+ls_user+' identified by '+ls_pass 
 
 Execute Immediate :ls_sql using sqlca; 
 
 ls_pass = f_password(ls_pass,1) 
 
 UPDATE TBL_PUB_PASSSHADOW SET PASSSHADOW =:ls_pass using pub_tr ; 
 
 commit using pub_tr; 
 
 commit using sqlca; 
 
 disconnect using pub_tr; 
 
 close(parent) 
 
 cb_2命令按钮的clicked事件如下：close(parent) 
 
 4、到此万事OK。 
 
 所有代码已在Win98环境下，用PowerBuilder 6.5测试通过。