Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Loand tên severname,database SQL vào combox trên form
#1
Nhờ mọi người giúp đỡ mình một việc thế này
Mình có một form kết nối CSDL bao gồm cả Access và SQl
ACESS thì Ổn rồi bầy giờ muốn làm bằng SQL
là khi người ta chọn vào combox Sever name thì tên severname SQL trên máy đó sẽ hiển thị lên combox cho người ta chọn để người ta không phải gõ vào thì phải làm thế nào hả mọi ngừoi

[Hình: SinhVienIT.Net---untitled-276.jpg]
Chữ ký của tt1212 Present Nhận viết phần mềm, hỗ trợ viết phần mềm, hợp tác viết phần mềm trên nên Microsoft Access mọi phiên bản Liên hệ: Mr Đức -989276236. Email: Tantriviet.vnn@gmail.com website:http://www.tantrivietsoft.com/
Reply
Những người đã cảm ơn
#2
Có lẽ phần này anh tt1212 nhờ anh hoanbhxhls trợ giúp sẽ tốt nhất vì anh ấy có nhiều kinh nghiệm trong việc triển khai kết nối SQL Server + Access.

Nhưng với câu hỏi trên em cũng xin mạng phép có vài lời góp ý, mong các anh bổ sung thêm nếu thiếu chỗ nào.

1. Khi đã triển khai SQL Server đừng bó hẹp trong phạm vi localhost mà ta phải nghĩ đến Web Server thì hay hơn. Cho nên vấn đề trên khi cung cấp ứng dụng cho người dùng ta chỉ cần tạo User + Pass đăng nhập là đủ rồi.

Còn phần tên Server và Database thì nên cho nó vào table hay một class/ thủ tục hàm gì đó để chạy sẽ linh hoạt hơn cho người dùng khi mở ứng dụng cứ lặp đi lặp lại đến 4 ô mới có thể đăng nhập vào ứng dụng. Thì thật chán nản luôn....

2. Em nghĩ mỗi cơ quan cao nhất chỉ có 1 Server thôi, Database thì có thể nhiều hay ít tùy thuộc vào có bao nhiêu ứng dụng được triển khai.


* Em xin phép được nói 2 ý này thôi vì em biết có lẽ kinh nghiệm anh còn nhiều hơn em nửa!

Thân ái chào anh.
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn tt1212
#3
(01-06-15, 05:01 PM)maidinhdan Đã viết: Có lẽ phần này anh tt1212 nhờ anh hoanbhxhls trợ giúp sẽ tốt nhất vì anh ấy có nhiều kinh nghiệm trong việc triển khai kết nối SQL Server + Access.

Nhưng với câu hỏi trên em cũng xin mạng phép có vài lời góp ý, mong các anh bổ sung thêm nếu thiếu chỗ nào.

1. Khi đã triển khai SQL Server đừng bó hẹp trong phạm vi localhost mà ta phải nghĩ đến Web Server thì hay hơn. Cho nên vấn đề trên khi cung cấp ứng dụng cho người dùng ta chỉ cần tạo User + Pass đăng nhập là đủ rồi.

Còn phần tên Server và Database thì nên cho nó vào table hay một class/ thủ tục hàm gì đó để chạy sẽ linh hoạt hơn cho người dùng khi mở ứng dụng cứ lặp đi lặp lại đến 4 ô mới có thể đăng nhập vào ứng dụng. Thì thật chán nản luôn....

2. Em nghĩ mỗi cơ quan cao nhất chỉ có 1 Server thôi, Database thì có thể nhiều hay ít tùy thuộc vào có bao nhiêu ứng dụng được triển khai.


* Em xin phép được nói 2 ý này thôi vì em biết có lẽ kinh nghiệm anh còn nhiều hơn em nửa!

Thân ái chào anh.
Xin cảm ơn Maidinhdan khồn biêt hoanbhxhls có nhiệt tình giúp đỡ cho hay không nữa
thật ra sever name, user, pass database đều nằm trong những bảng có sẵn của SQL tuy nhiên mình chỉ lấy được sau khi mình đã kết nối, nhưng ngặt nối giờ mình đang cần kết nối vậy thì làm sao mà lấy đưuọc040040
Chữ ký của tt1212 Present Nhận viết phần mềm, hỗ trợ viết phần mềm, hợp tác viết phần mềm trên nên Microsoft Access mọi phiên bản Liên hệ: Mr Đức -989276236. Email: Tantriviet.vnn@gmail.com website:http://www.tantrivietsoft.com/
Reply
Những người đã cảm ơn
#4
Anh tham khảo code này thử xem:

Mã PHP:
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
        
'Đọc lại các giá trị từ Registry
        SQLServerName = Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SQLServerName", "")
        SQLLoginMode = CType(Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SQLLoginMode", "False"), Boolean)
        SaveSQL = CType(Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SavedSQL", "False"), Boolean)
        SaveSQLUser = Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SaveSQLUser", "")
        SaveSQLPW = Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SaveSQLPW", "")
        SaveUser = CType(Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SaveUser", "False"), Boolean)
        SaveUserName = Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SaveUserName", "")
        SaveUserPW = Microsoft.VisualBasic.GetSetting(My.Application.Info.ProductName, "INIT", "SaveUserPW", "")
        '
-------------------------------------------
 
        
Dim dtSQL As New DataTable
        Dim sName 
As String
        dtSQL 
Microsoft.SqlServer.Management.Smo.SmoApplication.EnumAvailableSqlServers() 'Lấy tên các SQL Server
        For Each r As DataRow In dtSQL.Rows '
Đưa vào ComboBox
            sName 
r.Item("Name").ToString
            
If sName "" Then sName "(local)"
            
cboServerName.Items.Add(sName)
        
Next
        
If SQLServerName <> "" Then
            cboServerName
.Text SQLServerName 'Chọn ComboBox hiện tên Server đã chọn
        Else
            If cboServerName.Items.Count > 0 Then cboServerName.SelectedIndex = 0 '
Chưa có tên chọn Server đầu tiên
        End 
If
        
cntLogin 0
 
        
If Not SQLLoginMode Then 'Chọn loại đăng nhập
            WinAuth.Checked = True
            SQLAuth.Checked = False
            AuthServerSQL(False)
        Else
            WinAuth.Checked = False
            SQLAuth.Checked = True
            AuthServerSQL(True)
        End If
 
        CheckBoxServerSave.Checked = SaveSQL '
Chọn xem có lưu lại User và Pass không
        
If SaveSQL Then
            TextBoxServerLoginName
.Text SaveSQLUser
            TextBoxServerPassword
.Text SaveSQLPW
        End 
If
 
        
CheckBoxUserSave.Checked SaveUser
        
If SaveUser Then
            UsernameTextBox
.Text SaveUserName
            PasswordTextBox
.Text SaveUserPW
        End 
If
    
End Sub 


Và 1 link này nửa nếu cái trên không được: Nhấn vào đây

Em chưa test, có gì anh cho ý kiến thêm!
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn tt1212
#5
không kết nối đến server thì không lấy được Data name đâu
Chữ ký của hieuvn Xin chào! Mình là hieuvn, thành viên của Thủ Thuật Access tham gia ngày Oct 2010.
Reply
Những người đã cảm ơn
#6
Hieuvn nói rất đúng có le bo qua vấn đề đó đi.
Hiếu và Maidinhdan nghiên cứu xem mình đã kết nối được SQL và SQL trên host chạy được tuy nhiên giữa hai máy nhập và chạy song song xử lý chậm lắm
Chữ ký của tt1212 Present Nhận viết phần mềm, hỗ trợ viết phần mềm, hợp tác viết phần mềm trên nên Microsoft Access mọi phiên bản Liên hệ: Mr Đức -989276236. Email: Tantriviet.vnn@gmail.com website:http://www.tantrivietsoft.com/
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tự động hiện Form khi loading hết thời gian ChiMai 1 34 02-12-16, 08:59 PM
Bài mới nhất: ongke0711
Photo [Hỏi] Mở Form trên access 2007 báo lỗi jason 5 186 22-11-16, 09:23 AM
Bài mới nhất: jason
  Query hiện lên trên form? feeling 4 162 09-11-16, 09:49 PM
Bài mới nhất: toancvp
  [Help] Chỉnh giúp Form thống kê hoanghai902 2 123 28-10-16, 06:15 PM
Bài mới nhất: hoanghai902
  [Help] Dòng chữ chạy trên form báo đến ngày sinh nhật tronghieu9792 1 121 20-10-16, 09:30 AM
Bài mới nhất: lamvankhanh

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ