我现在做了个系统,开发语言是VB+SQL的,可是不会连接代码应用,谁会啊,我的系统是银行管理系统,实现的是办卡业务,取款及存款,谢谢啊 !!~!

解决方案 »

  1.   

    下面是部分代码,请参考 
    Private Sub Form_Load() 
        '连接字符串 
        Adodc1.ConnectionString = "driver={sql server};server=" + Trim(server) + ";uid=" + Trim(user) + ";pwd=" + Trim(password) + ";database=erp1" 
        '查询users表中全部信息 
        Adodc1.RecordSource = "select * from businessman" 
        '用datagrid显示查询信息 
        Set DataGrid1.DataSource = Adodc1 
        '刷新窗口信息 
        refresh_businessman 
    End Sub