Foxtable(狐表)用户栏目专家坐堂 → [求助]运行中创建数据源的问题


  共有3724人关注过本帖树形打印复制链接

主题:[求助]运行中创建数据源的问题

美女呀,离线,留言给我吧!
Bitree3078
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:154 威望:0 精华:0 注册:2013/7/15 19:09:00
[求助]运行中创建数据源的问题  发帖心情 Post By:2013/9/27 9:46:00 [显示全部帖子]

我想用狐表连接用友数据库 用友数据库用的是sqlserver2000 命名规则是UFDATA_帐套号_会计年度
写了一个窗口  
此主题相关图片如下:qq截图20130927093550.jpg
按此在新窗口浏览图片
确定按钮的click事件代码是:
Dim serverName As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim psw As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim name As WinForm.TextBox = e.Form.Controls("TextBox3")
Dim year As WinForm.TextBox = e.Form.Controls("TextBox4")

If serverName.Text <> "" AndAlso name.Text <> "" AndAlso year.Text <> "" Then
    Dim sqlConnStr As String = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;psw=" & psw.Text & "Initial  Catalog=UFDATA_" & name.Text & "_" & year.Text & ";Data Source=" & serverName.Text
    If Connections.TryConnect(sqlConnStr) = True Then
        Connections.Add("yongyou",sqlConnStr)
        MessageBox.Show("登陆成功!")
        ' MessageBox.Show(sqlConnStr)
    Else
        MessageBox.Show("数据源无法连通!")
        
    End If
Else
    MessageBox.Show("请填写完整的登陆信息!")
    
End  If


但是我发现只要是服务器名写对了就可以显示登录成功 密码数据库名是错误的也可以登录成功 而我希望的是四个信息都写对了才可以登录成功 应该怎么写 啊

 回到顶部
美女呀,离线,留言给我吧!
Bitree3078
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:154 威望:0 精华:0 注册:2013/7/15 19:09:00
  发帖心情 Post By:2013/9/27 10:21:00 [显示全部帖子]

目前就只有一个登录窗口 

 回到顶部
美女呀,离线,留言给我吧!
Bitree3078
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:154 威望:0 精华:0 注册:2013/7/15 19:09:00
  发帖心情 Post By:2013/9/27 10:27:00 [显示全部帖子]

服务器密码为空 目前就
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130927102223.jpg
图片点击可在新窗口打开查看 
目前就创建了一个帐套UFDATA_001_2013
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130927102328.jpg
图片点击可在新窗口打开查看

但是运行窗口
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130927102631.jpg
图片点击可在新窗口打开查看

 回到顶部