Rsync同步windows文件

用Rsync同步两台windows的数据,linux下的Rsync用过,windows的没用过,顺便记录一下.
两台服务器都是windows2003 Enterprise Edition R2,都放在美国,一台在美国AK机房,另一台在佛罗里达州,两台网络的相互ping值大概在60-70毫秒
同步140G的文件,虚拟主机的目录,文件不是一般的多… 让rsync停在receiving file list … 停了好久 起码20分钟 -_-!
第一次不会快到什么程度,但是以后的增量或差异效果就很明显了!
Rsync for windows : Server端
Rsync for windows : Client端

  1. 下载Server端安装
  2. 开始 -> 所有程序 -> cwRsync Server -> 05. Start a Unix BASH Shell
  3. 输入: /bin/activate-user.sh
  4. l 选择本地用户 (本地用户名过多会报错?我这边200个左右的用户,但是提示“命令运行完毕,但发生一个或多个错误”)
  5. Enter a user account for activation: 输入本地一个账户名
  6. 创建key后面也可以加的
  7. exit退出
  8.  
  9. ssh协议传输文件,需要启动opensshd服务,在services.msc里启动
  10. 编辑rsyncd.conf
  11. 开始 -> 所有程序 -> cwRsync Server -> 01. rsyncd.conf
  12. use chroot = false 
  13. strict modes = false #严格模式是不是效验文件? (未测试)
  14. hosts allow = * #允许哪个IP
  15. log file = rsyncd.log
  16. pid file = rsyncd.pid
  17. [test]
  18. path = /cygdrive/f/backup #路径
  19. read only = false #是否只读,不是为yes
  20. transfer logging = yes #是否记录日志? (没去看)
  21. 开始 -> 运行 -> services.msc -> 启动rsync server的服务
  22.  
  23. 客户端:
  24. C:\Program Files\cwRsync\bin>rsync.exe -zvrtopg 管理员帐号@IP地址:/cygdr
  25. ive/f盘/backup /cygdrive/f盘/backup
  26. 同步远端服务器的f盘的backup文件夹到本地的f盘的backup文件夹里

权限出错,为了方便,用回DeltaCopy…

vb批量修改access数据库

公司给个任务,在某个路径下,所有.abc为后缀文件名为ACCESS数据库的文件,默认有一行hello的用户的记录,密码是123123123,批量把这行记录拿掉。
记录一下,以后省得再弄,不太懂vb弄了个灰头土脸,再回头看看以前那公司的所谓的维护网管,真不懂他们能“维护”什么东西,无论是windows还是linux在我看来。

  1. Dim objFSO
  2. Dim ofolder
  3. Dim objStream
  4. Dim strSearch
  5. Dim strfolderSearch
  6. Set objFSO = CreateObject("scripting.filesystemobject")
  7. Set objStream = objFSO.createtextfile("c:\resolved.txt", True)
  8. strfolderSearch = "E:\wwwroot"
  9. strSearch = ".abc"
  10. strLen=Len(strSearch)
  11. CheckFolder (objFSO.getfolder(strfolderSearch)), objStream
  12. MsgBox "File Search Completed." + vbCr + "Please check c:\resolved.txt for details."
  13. Sub CheckFolder(objCurrentFolder, objtxtFile)
  14.         On Error Resume Next
  15.     Dim strTemp
  16.     Dim strOutput
  17.     Dim objNewFolder
  18.     Dim objFile
  19.     Dim objStream
  20.     For Each objFile In objCurrentFolder.Files
  21.         strTemp = Right(objFile.Name, strLen)
  22.     If UCase(strTemp) = UCase(strSearch) Then
  23.         objtxtFile.writeline CStr(objFile.Path)   
  24.         Dim Conn,SQL
  25.         Dim dbPath,Password
  26.         Set conn = CreateObject("ADODB.Connection")
  27.         dbPath=objFile.Path
  28.         Password="123123123"
  29.         Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&dbPath&";User ID="&param_dbUserID&";Password="&Password
  30.         If Err Then
  31.             objtxtFile.writeline CStr(objFile.Path) + "-----------" + err.tostring"----------Failed !" 
  32.             Err.CLEAR
  33.             Set Conn = NOTHING           
  34.         Else
  35.             Set RS = Conn.Execute("Select * From admin Where name='hello'")
  36.             If RS.recordcount > 0 Then 
  37.                 Conn.Execute("Delete From admin Where name='hello'")
  38.             End If
  39.             Conn.close
  40.         End if
  41.  
  42.     End If
  43.     Next
  44.     For Each objNewFolder In objCurrentFolder.subFolders
  45.         CheckFolder objNewFolder, objtxtFile
  46.     Next
  47. End Sub

NT AUTHORITY\ANONYMOUS LOGON

windows2003的eventlog里发现大量事件ID为538,事件ID为540的日志
原因是共享,如果NFTS的权限跟FTP的匿名共享都已经做了修改,记得关闭空链接及共享!
修改后已经恢复了…

  1. reg add HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa 
  2. /v RestrictAnonymous /t reg_DWORD /d 00000001 /f
  3.  
  4. reg add HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\LanmanServer\
  5. Parameters /v AutoShareWks /t reg_DWORD /d 0 /f
  6.  
  7. 开始 -> 运行 -> 服务(services.msc) -> server -> 停止并禁用!

Read more »

免费的远程桌面管理工具 visionapp remote desktop (vRD)

由于工作的原因,一直使用Royal TS这个远程桌面管理器,但总觉得不太顺手,而且占用资源比较厉害,并且是收费软件。

今天无意中发现visionapp remote desktop这款远程桌面管理软件,软件不大才700多K,挺顺手的,界面清晰、漂亮,而且该有的功能都有,远程剪贴板,远程磁盘共享等较实用的功能。

美中不足的是好像有点小BUG,开多个窗口的时候,会出现两个远程窗口来回不停的切换?不过不碍事,随便点击其中一个就恢复正常。

官方网站:http://www.visionapp.com/vRD.html
绿盟的这个是free license版本,不用付费的 :)
绿盟下载:http://www.xdowns.com/soft/1/118/2008/Soft_46725.html

MSSQL被攻击 使用组策略封IP

朋友们五一快乐 :) 你们放假了我还要忙呀,不过本职工作,还是义不容辞地~
手上三台windows的服务器,查看其中一台日志发现有大量ID为18456的错误日志:

  1. 事件类型:    审核失败
  2. 事件来源:    MSSQLSERVER
  3. 事件种类:    (4)
  4. 事件 ID:    18456
  5. 日期:        2009-5-2
  6. 事件:        9:51:42
  7. 用户:        N/A
  8. 计算机:    xxx
  9. 描述:
  10. 用户 'administrator' 登录失败。 [客户端: xx.xx.xx.xx]
  1. 事件类型:    审核失败
  2. 事件来源:    MSSQLSERVER
  3. 事件种类:    (4)
  4. 事件 ID:    18456
  5. 日期:        2009-5-2
  6. 事件:        4:52:41
  7. 用户:        N/A
  8. 计算机:    xxx
  9. 描述:
  10. 用户 'admin' 登录失败。 [客户端: xx.xx.xx.xx]

Read more »

3 «123