AI muốn lập trình DLL cho Excel và các loại bằng Delphi thì xem video này nhé!

[Nguyễn Duy Tuân]

Đây là video hướng dẫn cách tạo DLL trên Delphi nhưng sử dụng trong VBA, Excel. Đây là phương pháp lập trình chuyên nghiệp nhưng không phải là khó. Giúp bạn bảo mật code của phần mềm tốt hơn.

Loạt video hướng dẫn lập trình Delphi cơ bản của mình tại đây:
https://www.giaiphapexcel.com/diend...-trình-delphi-cơ-bản-từ-bluesofts-net.138736/

 

[thuyyeu99]

Nó có thông báo gì khi kết nối không em?

đây anh

Mà lâu em thấy nó lỗi Excel, không biết do tại sao? Ip em go dung :192.168.0.102

 

[Nguyễn Duy Tuân]

đây anh
View attachment 209767
Mà lâu em thấy nó lỗi Excel, không biết do tại sao? Ip em go dung :192.168.0.102

EM kết nối trong mạng LAN? EM kiểm tra trong Control Panel -> FireWall đã thiết lập đúng port 1711 của A-Tools chưa?

 

[thuyyeu99]

EM kết nối trong mạng LAN? EM kiểm tra trong Control Panel -> FireWall đã thiết lập đúng port 1711 của A-Tools chưa?
View attachment 209769

Không anh , em ket noi qua intenet
(Control Panel -> FireWall đã thiết lập đúng port 1711 của A-Tools chưa? ) cai này là kiểm tra cả 2 máy hay chỉ máy chủ thôi anh

 

[Nguyễn Duy Tuân]

Không anh , em ket noi qua intenet
(Control Panel -> FireWall đã thiết lập đúng port 1711 của A-Tools chưa? ) cai này là kiểm tra cả 2 máy hay chỉ máy chủ thôi anh

Khi kết nối Excel qua internet với A-Tools bắt buộc phải làm 2 bước (quy định chung cho các phần mềm) :
1. Mở cổng modem với port: 1711
2. DÙng IP tĩnh hoặc IP internet để kết nối.

 

[thuyyeu99]

Khi kết nối Excel qua internet với A-Tools bắt buộc phải làm 2 bước (quy định chung cho các phần mềm) :
1. Mở cổng modem với port: 1711
2. DÙng IP tĩnh hoặc IP internet để kết nối.

Sao anh không viết 1 tool cấu hình Router đi anh

 

[Hai Lúa Miền Tây]

Sao anh không viết 1 tool cấu hình Router đi anh

Hầu hết trường hợp thiết lập modem đều phải làm bằng tay nhen bạn.

 

[Nguyễn Duy Tuân]

Sao anh không viết 1 tool cấu hình Router đi anh

Mình thấy viết ứng dụng tự cấu hình rất khó. Mỗi modem người quản trị mạng lại có user riêng và mẫu form thiết lập riêng, chưa kể hệ thống modem lại kết nối với nhau nữa... Nên hiện nay việc thiết lập modem vẫn phải để cho quản trị mạng họ làm em à.

 

[Kiều Mạnh]

1/ Cũng vì mê code két hôm rồi Mạnh kéo mấy tay lắp camera tới nó cấu hình cho cái Modem Viettel F608 mãi không được ... xong ra về buồn thui à
2/ Mạnh keo Viettel nó trả lời là nó bảo đảm cho mang internet kết nối ok còn cái đó nó không hổ trợ ... tự xử lấy
3/ Ra Viettel hỏi gói IP tĩnh thì nó keo ................... OK ................... vậy là đang để đó xem xét

Bài đã được tự động gộp: 21/12/18

Sao anh không viết 1 tool cấu hình Router đi anh

Thế mà keo hôm em kết nối qua Internet thành công làm Mạnh mừng hụt hehehehehehe

 

[thuyyeu99]

Em thấy có 1 tool người ta viết chỉ cần nhập Pass va User là nó sẽ liệt kê thông tin của Router, mà anh nói đúng tùy loại Modem, chứ không phải cái nào cũng giống nhau.

TO kieu manh jzậy là cái của anh nó kết nối In tẹt nét được rồi nhé chẳng qua chưa mở Post

(Em có biết đâu nè kết nối trong lòng vòng có 1 cái máy tính, tưởng là kết nối đơn giản do kiến thức chỉ biết phần ngọn không biết phần gốc sorysory)

 

[Kiều Mạnh]

Em thấy có 1 tool người ta viết chỉ cần nhập Pass va User là nó sẽ liệt kê thông tin mình cần ra hết, mà anh nói đúng tùy loại Modem, chứ không phải cái nào cũng giống nhau.

TO kieu manh jzậy là cái của anh nó kết nối In tẹt nét được rồi nhé chẳng qua chưa mở Post

Kiểu này mạnh lại phải ra Viettel nâng cấp gói cước + IP tĩnh đây ....
Mê code két khổ thế đấy ..................
Còn cái Modem F680 của mạnh là mấy tay chuyên làm camera chào thua rồi đó

Vậy là Anh em Mình đi đứng hướng Mặt trời mọc ròi đó he ................

 

[Kiều Mạnh]

Vậy Mạnh chốt đại 1 câu .... Nếu Sai thì chốt lại He ???!!

1/ Mở Port Modem cho phép kết nối từ xa
2/ Mở Port dưới tường lửa cho phép kết nối từ xa
.....
4/ Nếu 2 cái trên OK thì ta có thể xài ADO bình thường truy vấn duy liệu từ xa vậy .... cần chi phải phức tạp cho mệt he
5/ Nếu ngon nữa ta làm trên DataSnap cái Server hay (TCP Server-Client ) cho nó Chạy Auto khi mở máy tính vậy là từ xa ta kết nối ok he

6/ Nếu Mạnh phán sai thì phán lại lo chi

 

[Nguyễn Duy Tuân]

Vậy Mạnh chốt đại 1 câu .... Nếu Sai thì chốt lại He ???!!

1/ Mở Port Modem cho phép kết nối từ xa
2/ Mở Port dưới tường lửa cho phép kết nối từ xa
.....
4/ Nếu 2 cái trên OK thì ta có thể xài ADO bình thường truy vấn duy liệu từ xa vậy .... cần chi phải phức tạp cho mệt he
5/ Nếu ngon nữa ta làm trên DataSnap cái Server hay (TCP Server-Client ) cho nó Chạy Auto khi mở máy tính vậy là từ xa ta kết nối ok he

6/ Nếu Mạnh phán sai thì phán lại lo chi

Trong Delphi, với các loại CSDL Excel, Access, Foxpro (không phải CSDL Server) thì có thể dùng ADO và kết nối mạng LAN. Còn các loại CSDL theo chuẩn Client - Server khác thì đừng dùng ADO. Dùng FireDAC.

 

[Hai Lúa Miền Tây]

Vậy Mạnh chốt đại 1 câu .... Nếu Sai thì chốt lại He ???!!

1/ Mở Port Modem cho phép kết nối từ xa
2/ Mở Port dưới tường lửa cho phép kết nối từ xa
.....
4/ Nếu 2 cái trên OK thì ta có thể xài ADO bình thường truy vấn duy liệu từ xa vậy .... cần chi phải phức tạp cho mệt he
5/ Nếu ngon nữa ta làm trên DataSnap cái Server hay (TCP Server-Client ) cho nó Chạy Auto khi mở máy tính vậy là từ xa ta kết nối ok he

6/ Nếu Mạnh phán sai thì phán lại lo chi

Có phải anh đang test cái DataSnap REST?

Ngay từ đầu thì em cũng đã nói với anh là nếu kết nối qua Internet thì điều trước tiên anh phải có là IP tĩnh. Sau đó mới tính tiếp được.

 

[Kiều Mạnh]

Có phải anh đang test cái DataSnap REST?

Ngay từ đầu thì em cũng đã nói với anh là nếu kết nối qua Internet thì điều trước tiên anh phải có là IP tĩnh. Sau đó mới tính tiếp được.

View attachment 209787

Chính xác là vậy
Thực ra ko có IP tĩnh ta vẫn chơi chiêu lấy được dữ liệu .... nhưng quan trọng nhất là Mở Port Modem ( như cái Modem của mạnh là thua)

Ý Tưởng của Mạnh là vầy:

1/ Mở Port Modem OK
2/ Mở Port dưới Tường Lửa OK

3/ xong từ máy chủ ta xài code lấy IP Internet Lưu vào OneDrive ( hay lên đâu đó tùy thích ) khi khởi động máy tính
4/ Từ máy khách muốn có IP máy chủ thì xài code tải file IP máy chủ đó về xài

Tại sao phải làm vậy vì IP động nó luôn thay đổi khi khởi động lại Modem hay có sự tác động vào nó ....vv mất điện vv

5/ vậy từ máy chủ ta không muốn ko cho ai kết nối nữa thì xóa cái file IP đi là xong... an toàn và bảo mật
6/ Code lấy IP thì có nhiều cách lấy Mạnh tạm lấy code sau xài đỡ vậy

Private Sub GetIpInternetPublic()
    Dim xx, ss, GetIP As String, IP
    GetIP = "http://dynupdate.no-ip.com/ip.php"
    Rem GetIP = "http://www.networksecuritytoolkit.org/nst/tools/ip.php"
    Set xx = CreateObject("MSXML2.ServerXMLHTTP")
    Set ss = CreateObject("ADODB.Stream")
    ss.Type = 1
    xx.Open "GET", GetIP, False, "", ""
    xx.Send
    ss.Open
    ss.Write xx.responseBody
    ss.SaveToFile ThisWorkbook.Path & "\MyIP.txt", 2
    ss.Close
    ''MsgBox "Ðã xong"
End Sub

vậy là bài học truy vấn dữ liệu qua Internet ..... tạm thời chốt lại coi như cơ bản đã học xong
Cảm ơn các Bạn rất nhiều

 

[thuyyeu99]

Chính xác là vậy
Thực ra ko có IP tĩnh ta vẫn chơi chiêu lấy được dữ liệu .... nhưng quan trọng nhất là Mở Port Modem ( như cái Modem của mạnh là thua)

Ý Tưởng của Mạnh là vầy:

1/ Mở Port Modem OK
2/ Mở Port dưới Tường Lửa OK

3/ xong từ máy chủ ta xài code lấy IP Internet Lưu vào OneDrive ( hay lên đâu đó tùy thích )
4/ Từ máy khách muốn có IP máy chủ thì xài code tải file IP máy chủ đó về xài

Mục đích để làm gì vậy anh.
Nếu vậy sao anh không sử dụng Google làm trung gian gởi tin giữa Clien và Sever (Clien gởi lệnh - Sever chạy lệnh gởi kết quả thông qua google)

 

[Kiều Mạnh]

3/ xong từ máy chủ ta xài code lấy IP Internet Lưu vào OneDrive ( hay lên đâu đó tùy thích )
4/ Từ máy khách muốn có IP máy chủ thì xài code tải file IP máy chủ đó về xài

Mục đích để làm gì vậy anh

thì cho máy khách IP máy chủ để truy cập vào máy chủ lấy dữ liệu chứ sao ... khi mình đang xài IP động

 

[thuyyeu99]

thì cho máy khách IP máy chủ để truy cập vào máy chủ lấy dữ liệu chứ sao ... khi mình đang xài IP động

Nếu vậy sao anh không sử dụng Google làm trung gian gởi tin giữa Clien và Sever (Clien gởi lệnh - Sever chạy lệnh gởi kết quả thông qua google)
khỏi cần port rồi, không biết ơn không ta

 

[Kiều Mạnh]

Nếu vậy sao anh không sử dụng Google làm trung gian gởi tin giữa Clien và Sever (Clien gởi lệnh - Sever chạy lệnh gởi kết quả thông qua google)
khỏi cần port rồi, không biết ơn không ta

cái này Mạnh nghe mới à nha ... ko biết bắt đầu từ đâu

 

[thuyyeu99]

cái này Mạnh nghe mới à nha ... ko biết bắt đầu từ đâu

Em cũng có biết đâu mới thấy anh nói chợt nghĩ ra kkkk
Mò thử xem sao

 

[Kiều Mạnh]

Em cũng có biết đâu mới thấy anh nói chợt nghĩ ra kkkk
View attachment 209792Mò thử xem sao

hay đó chắc làm lâu ròi nhưng dấu ko muốn share thì nói vậy chứ gì ???!!!
bắt đầu từ đâu vậy chỉ Mạnh tài liệu + linh + help quậy với xem sao ?????