Code VB6 tạo phân vùng ổ cứng ảo

Code VB6 t o phân vùng c ng o ạ ổ ứ ả Thêm m t checkbox vào form và chép đo n code này vào :ộ ạ 'C n 1 CheckBoxầ Private Sub Check1_Click() If Check1.Value = 1 Then 'T o đĩa o "V:" b ng th m c "Tin" trong C:ạ ổ ả ằ ư ụ ổ Shell "subst " & "V:" & Space$(1) & "C:\Tin", vbHide Else 'Xóa đĩa oổ ả Shell "subst " & "V: /d", vbHide End If End Sub Exchange Database - Local Continuous Replication I- MÔ HÌNH Figure 1 - Single Copy Clusters Figure 2 - Cluster Continuous Replication II- GI I THI UỚ Ệ Nh ban đa biêt trong san phâm Exchange Server 2007 cung câp kha năng chiu lôi vaư ̣ ̃ ́ ̉ ̉ ́ ̉ ̣ ̃ ̀ tinh săn sang cao v i cac c chê đông bô d liêu gi a cac Database Mailbox hay cac Serveŕ ̃ ̀ ớ ́ ơ ́ ̀ ̣ ữ ̣ ữ ́ ́ chay Clustering v i nhau gôm co cac giai phap sau :̣ ớ ̀ ́ ́ ̉ ́ + LCR (Local Continuous Replication) : la c chê đông bô d liêu mailbox database cuà ơ ́ ̀ ̣ ữ ̣ ̉ Exchange năm cung trên môt Server. Cac Storage Group Database se t sinh ra 2 ban đông bồ ̀ ̣ ́ ̃ ự ̉ ̀ ̣ d liêu liên tuc cho nhau theo c chê Active va Passive. Moi thay đôi d liêu t DB active seữ ̣ ̣ ơ ́ ̀ ̣ ̉ ữ ̣ ừ ̃ đêu đ c t đông đông bô sang DB passivè ượ ự ̣ ̀ ̣ + CCR (Cluster Continuous Replication) : la c chê đông bô d liêu thông qua môt̀ ơ ́ ̀ ̣ ữ ̣ ̣ cluster gôm 2 Node Server chay liên tuc v i nhau. Đây la môt c chê m i cua Exchange Server̀ ̣ ̣ ớ ̀ ̣ ơ ́ ớ ̉ 2007 đ c nhiêu ng i s dung. No tao ra 2 ban copy trên 2 server chay active va passive. Dượ ̀ ườ ử ̣ ́ ̣ ̉ ̣ ̀ ữ liêu đ c đông bô liên tuc trong 2 con server chay cluster v i nhau. CCR yêu câu hê thông điạ ượ ̀ ̣ ̣ ̣ ớ ̀ ̣ ́ ̃ l u tr SCSI, iSCSI, SAS hoăc SANư ữ ̣ + SCC (Single Copy Cluster) : đây la c chê cluster 2 server Exchange cung chay va chià ơ ́ ̀ ̣ ̀ se trên cung môt hê thông l u tr databases. SCC cung yêu câu vê hê thông đia l u tr giông̃ ̀ ̣ ̣ ́ ư ữ ̃ ̀ ̀ ̣ ́ ̃ ư ữ ́ CCR nh SCSI, iSCSI, SAS hoăc SAN. Nh ng tr ng h p nay nêu Database bi hong maư ̣ ư ở ườ ợ ̀ ́ ̣ ̉ ̀ không co Backup d liêu thi không thê phuc hôi đ c.́ ữ ̣ ̀ ̉ ̣ ̀ ượ Trong phân I bai viêt nay tôi se gi i thiêu tinh năng LCR (Local Continuous Replication)̀ ̀ ́ ̀ ̃ ớ ̣ ́ trong Exchage v i c chê đia iSCSI ao băng phân mêm StarWind vaớ ơ ́ ̃ ̉ ̀ ̀ ̀ ̀Microsoft iSCSI Software Initiator . Trong loat bai viêt kê tiêp tôi se gi i thiêu vê tinh năng CCR va SCC.̣ ̀ ́ ́ ́ ̃ ớ ̣ ̀ ́ ̀ III- CÁC B C TRI N KHAIƯƠ Ể Gia đinh đa cai đăt hoan chinh phiên ban Exchange Server 2007 trên hê điêu hanh Windows̉ ̣ ̃ ̀ ̣ ̀ ̉ ̉ ̣ ̀ ̀ Server 2003 SP2. Ban co thê tham khao thêm cac b c cai đăt Exchange tai điạ ́ ̉ ̉ ́ ướ ̀ ̣ ̣ ̣ chi ̉ 1. Cai đăt va câu hinh StarWind̀ ̣ ̀ ́ ̀ 2. Cai đăt va câu hinh̀ ̣ ̀ ́ ̀ Microsoft iSCSI Software Initiator 3. Câu hinh LCR trên Storage Group Databaseś ̀ 4. Gia lâp hong Database Active va khôi phuc lai t Database Passivẻ ̣ ̉ ̀ ̣ ̣ ừ IV- TRI N KHAI CHI TI TỂ Ế 1. C u hình Starwind tai 1 máy workgroup.ấ ̣ M c đích: Gia lâp đ t o ra 1 ho c nhi u đĩa dynamic dùng chung cho cluster Serverụ ̉ ̣ ể ạ ặ ề ổ Sau khi cài đ t Starwind. các b n ti n hành t o Image file nh sau:ặ ạ ế ạ ư - Start->All Programs->Rocket Division Software->StarWind->StarWind. StarWind icon se xuât̃ ́ hiên traybar. Double-click vao biêu t ng đê câu hinḥ ở ̀ ̉ ượ ̉ ́ ̀  chon Start Management menụ option. - Click Connect vào Localhost: Nh p username và pass đ connect. M c đ nh username và pass đ u làậ ể ặ ị ề test - Sau khi connect thành công, chúng ta t o đĩa o b ng cách: Add Device.ạ ổ ả ằ - Ch n: Image File device.ọ - Các b n ch n Create new imageạ ọ - B n cung c p đ ng d n/tên_file.img đ t o m i. Chú ý cung c p thông tin v dung l ngạ ấ ườ ẫ ể ạ ớ ấ ề ượ đĩa cho ph n m m.ổ ầ ề - Ti p theo, các b n chú ý ph i check vào ô: Allow multiple connectionsế ạ ả - Cung c p thông tin cho đĩa o - Không quan tr ng l m:ấ ả ọ ắ - Click Next, ch n Finish là xong.ọ T ng t cho viêc găn thêm môt Disk 2 vao trong môt Cluster. Kêt qua nh sauươ ự ̣ ́ ̣ ̀ ̣ ́ ̉ ư 2. Cài đ t Microsoft iSCSI Software Initiatorặ Muc đich nhăm kêt nôi đên may cai StartWind đinh nghia c chê đia iSCSI.̣ ́ ̀ ́ ́ ́ ́ ̀ ̣ ̃ ơ ́ ̃ Sau khi cài đ t iSCSI, các b n làm nh sau đ h đi u hành tìm th y đĩa đã t o b cặ ạ ư ể ệ ề ấ ổ ạ ở ướ tr c:ướ - Start->All Programs->Microsoft iSCSI Initiator-> Microsoft iSCSI Initiator. - Ch n Discovery tab. Chúng ta s add computer đã cài đ t StarWind. Click the “Add”ọ ẽ ặ - Gõ vào IP address c a máy cai Starwind và port. M c đ nh là 3260ủ ̀ ặ ị - Sau đó chuy n t i Targets tab. Chúng ta s th y hi n ra các image đã t o máy Starwind lúcể ớ ẽ ấ ệ ạ ở tr c.ướ - B n ch n image c n thi t, r i nh n vào Logon. Chú ý check vào option:ạ ọ ầ ế ồ ấ Automatically restore this connection when the system boots - Các b n s th y đĩa image đã đ c connectạ ẽ ấ ổ ượ - Cu i cùng, các b n hãy vào Disk Manager đ Create Partion, Format c ng nh binhố ạ ể ổ ứ ư ̀ th ng Basic Diskườ Download ph n m m Starwind t trangầ ề ừ web: ho c link sau:ặ (Các b n hãy down b n Pro, dùng th 30 ngày đu đê ban Test Lab rôi)ạ ả ử ̉ ̉ ̣ ̀ Và download Microsoft iSCSI Software Initiator t website c aừ ủ Microsoft: 3. Câu hinh LCR trên Storage Group Databaseś ̀ - Chuân bi 2 th muc NhatNghe Storage Group trên ô đia E:\ (đây se la Databasẻ ̣ ư ̣ ̉ ̃ ̃ ̀ Active chinh hoat đông) va th muc NhatNghe Storage Group LCR trên đia F:\ (đâý ̣ ̣ ̀ ư ̣ ̃ se la n i ch Database Passive đ c đông bô d liêu vao)̃ ̀ ơ ứ ượ ̀ ̣ ữ ̣ ̀ - M ch ng trinh quan ly Exchange Managerment Consoleở ươ ̀ ̉ ́  Server Configuration  Mailbox  Click phai chuôt tao môt Storage Group m ỉ ̣ ̣ ̣ ớ - Chon New Storage Group̣ - Check vaò Enable local continuous replication  sau đo nhât nut Browse choń ́ ́ ̣ theo hinh trên. Nhân Next̀ ́ - Finish đê hoan tât viêc tao NhatNghe Storage đa bât ch c năng LCR̉ ̀ ́ ̣ ̣ ̃ ̣ ứ - Nhân phai chuôt vao Nhatnghe SG choń ̉ ̣ ̀ ̣ New Mailbox Database - Đăt tên Mailbox Database rôi nhân Browse tro vê Database Active va Database LCṚ ̀ ́ ̉ ̀ ̀ (Passive)  New  Finish - Kiêm tra tinh trang cua NhatNghe Storage Group trong côt Copy Status la Healthỷ ̀ ̣ ̉ ̣ ̀ thi hê thông đa kich hoat thanh công c chê LCR̀ ̣ ́ ̃ ́ ̣ ̀ ơ ́ 4. Gia lâp hong Database Active va khôi phuc lai t Database Passivẻ ̣ ̉ ̀ ̣ ̣ ừ - Tao ra 2 user mailbox trên Database Nhatnghe m i tao ra va g i mail qua lai đệ ớ ̣ ̀ ử ̣ ̉ kiêm tra tinh trang hoat đông cua Replication̉ ̀ ̣ ̣ ̣ ̉ - Kiêm tra d liêu trên 2 ô đia câu hinh Database Replication. Ta nhân thây răng cac̉ ữ ̣ ̉ ̃ ́ ̀ ̣ ́ ̀ ́ file log va file edb đ c đông bô môt cach liên tuc v i cac gia tri size giông nhau.̀ ượ ̀ ̣ ̣ ́ ̣ ớ ́ ́ ̣ ́ - Stop Services MS Exchange Information Store đê can thiêp pha huy Database băng̉ ̣ ́ ̉ ̀ cach m file EDB lên go thêm vai nôi dung vao.́ ở ̃ ̀ ̣ ̀ - Sau đo Start lai Services MS Exchange Information Store xong vao phân quan lý ̣ ̀ ̀ ̉ ́ Mailbox Database cua Exchange ta nhân thây tinh trang bi Dismout Database bi lôi.̉ ̣ ́ ̀ ̣ ̣ ̣ ̃ - Va du ban co Mount lai cung se nhân đ c thông bao lôi.̀ ̀ ̣ ́ ̣ ̃ ̃ ̣ ượ ́ ̃ - Bây gi ta chuyên vao ô đia F:\ đang ch a nh ng file Database Passvise đang đ cờ ̉ ̀ ̉ ̃ ứ ữ ượ đông bô rôi copy đe vao toan bô vao Database Active đang bi hong̀ ̣ ̀ ̀ ̀ ̀ ̣ ̀ ̣ ̉ - Sau đo Mount lai Database lai thi se thây hoat đông binh th nǵ ̣ ̣ ̀ ̃ ́ ̣ ̣ ̀ ườ - M mail kiêm tra thây d liêu vân đây đu.ở ̉ ́ ữ ̣ ̃ ̀ ̉ H t.ế Tr nầ