6
Tôi đã dưới đây lưu trữ trong excel vĩ mô: -Làm thế nào để che giấu excel mã macro
Sub Sales()
Dim StrSQl As String
Con = "Provider=IBMDA400;Data Source=192.168.2.2;User Id=boss;Password=1we56"
Set Db = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.recordset")
Db.connectionSTring = Con
Db.Open
StrSQl = "select myuc, sum (myac) as Amount from myabc.myqwerty where mydt >= 20100101 and mydt <= 20100831 group by (mycl)"
rs.Open StrSQl, Db, 3, 3
Sheet1.Cells(10, 1).CopyFromRecordset rs
rs.Close
Set rs = Nothing
Set cn = Nothing
End Sub
Tôi muốn mặt nạ trên User ID & Password tức. User Id=****;Password=***** là một phần của bảo mật.
Điều đó có khả thi không?
Tôi muốn nói mật khẩu bảo vệ dự án vba. – Pynner
Ok nhưng nó không phải là lựa chọn tốt nhất. Có nhiều cách để crack nó, nhưng nếu ID & Password được đeo mặt nạ, điều đó sẽ cung cấp thêm sự bảo mật. – Bob
@Bob Có nhiều cách để crack mọi loại bảo mật, thật không may là bản chất của sự vật, không có hệ thống nào có thể được tạo ra mà không thể bị phá vỡ. Mọi người có thể sẽ cần các chương trình trả tiền để phá vỡ dự án VBA và do đó không có khả năng làm phiền. –