华为DSLAM MA5100批量端口调速2.doc

华为DSLAM MA5100批量端口自动调速原理和实现=程序语言：vbscript 运行工具：secureCRT 6.7 +作者：鲍继川时间：2012.9.21.18.52=原理：1. 通过show board 0 查找每块宽带板卡2. 创建宽带模板3. Intterface 进入相应的板卡，激活和去激活=程序执行效果图：脚本实际运行如下： Huawei MA5103 Multi-service Access Module. Copyright(C) 2002-2006 by Huawei Technologies Co., Ltd. User name ( Password (dslam2011 Incorrect command:dslam2011 _5100enable _5100#configure terminal _5100(config)#show board 0 FrameId FrameName FrameType MasterSepSlot MasterSepPort - - - - - 0 Main Frame master - - - - - - - Slot Type Name State No.1 SubBoardtype No.2 SubBoardtype - - - - - - 1 LAND H511LAND Normal H511E8FS - 2 EMPTY - - - - 3 EMPTY - - - - 4 EMPTY - - - - 5 ADLE H511ADLE Normal - - 6 ADCG H513ADCG Normal - - 7 MMX H511MMXC Running Normal E8IT(IMA) - - - - - - - _5100(config)# _5100(config)#adsl line-profile add2-99: During input,press Q to quit,then settings at this time are neglected. Please choose default value type 0-adsl 1-adsl2+(01) 0: 1 Will you set basic configuration for modem? (y/n) n: Please select channel mode 0-interleaved 1-fast (01) 0: Will you set interleave delay? (y/n) n: Please select form of transmit rate adaptation in downstream: 0-fixed 1-adaptAtStartup 2-adaptAtRuntime (02) 1: Will you set SNR margin for modem? (y/n) n: Will you set parameters for rate? (y/n) n: y Min bit rate in downstream (3232000 Kbps) 32: Max bit rate in downstream (3232000 Kbps) 32000: 1024 Min bit rate in upstream (323000 Kbps) 32: Max bit rate in upstream (323000 Kbps) 3000: 512 Add profile 13 successfully _5100(config)#show adsl line-profile 1-102: - - - - - - - - profile operating channel min down max down min up max up used index mode mode rate rate rate rate ports (Kbps) (Kbps) (Kbps) (Kbps) - - - - - - - - 1 All Interleaved 32 6144 32 640 0 2 All Interleaved 32 1024 32 640 0 3 All Interleaved 32 3098 32 512 0 4 All Interleaved 32 512 32 512 0 5 All Interleaved 32 2048 32 640 0 6 All Interleaved 32 2048 32 512 0 7 All Interleaved 32 4096 32 512 0 8 All Interleaved 32 4096 32 512 0 9 All Interleaved 32 4096 32 512 0 10 All Interleaved 32 1024 32 896 0 11 All Interleaved 32 1024 32 512 32 12 All Interleaved 32 1024 32 512 32 13 All Interleaved 32 1024 32 512 0 100 All Fast 32 6144 32 640 0 101 All Interleaved 32 6144 32 640 0 102 All Interleaved 32 32000 32 3000 0 - Total: 16 _5100(config)#interface adsl 0/5_5100(config-ADSL-0/5)#deactivate all Port 0: Command send successfully. Port 1: Command send successfully. Port 2: Command send successfully. Port 3: Command send successfully. Port 4: Command send successfully. Port 5: Command send successfully. Port 6: Command send successfully. Port 7: Command send successfully. Port 8: Command send successfully. Port 9: Command send successfully. Port10: Command send successfully. Port11: Command send successfully. Port12: Command send successfully. Port13: Command send successfully.2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/0) Port14: Command send successfully.2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/1)2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/2) Port15: Command send successfully.2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/3) Port16: Command send successfully.2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/4) Port17: Command send successfully.2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/5)2012/09/21 19:33:13 minor ADL: Port deactivated(0/5/6) Port18: Command send successfully.2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/7) Port19: Command send successfully.2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/8) Port20: Command send successfully.2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/9) Port21: Command send successfully.2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/10) 2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/11) Port23: Command send successfully.2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/12)2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/13) Port24: Command send successfully.2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/14)2012/09/21 19:33:14 minor ADL: Port deactivated(0/5/15) Port25: Command send successfully. Port26: Command send successfully.2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/16) Port27: Command send successfully.2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/17)2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/18) Port28: Command send successfully.2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/19) Port29: Command send successfully.2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/20)2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/21) Port30: Command send successfully. Port31: Command send successfully. 2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/22)2012/09/21 19:33:15 minor ADL: Port deactivated(0/5/23)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/24)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/25)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/26)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/27)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/28)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/29)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/30)2012/09/21 19:33:16 minor ADL: Port deactivated(0/5/31)_5100(config-ADSL-0/5)# _5100(config-ADSL-0/5)#activate all 13 Port 0: Command send successfully. Port 1: Command send successfully. Port 2: Command send successfully. Port 3: Command send successfully. Port 4: Command send successfully. Port 5: Command send successfully. Port 6: Command send successfully. Port 7: Command send successfully. Port 8: Command send successfully. Port 9: Command send successfully. Port10: Command send successfully. Port11: Command send successfully. Port12: Command send successfully. Port13: Command send successfully. Port14: Command send successfully. Port15: Command send successfully. Port16: Command send successfully. Port17: Command send successfully. Port18: Command send successfully. Port19: Command send successfully. Port20: Command send successfully. Port21: Command send successfully. Port22: Command send successfully. Port23: Command send successfully. Port24: Command send successfully. Port25: Command send successfully. Port26: Command send successfully. Port27: Command send successfully. Port28: Command send successfully. Port29: Command send successfully. Port30: Command send successfully. Port31: Command send successfully. _5100(config-ADSL-0/5)#exit _5100(config)#interface adsl 0/6 _5100(config-ADSL-0/6)#=5100文件为 5100.txt 用来读取每个5100的ip的Xxx.xxx.xxx.xxx.内容完；第一个值为ip，第二个为svlan第二个值暂时没用哦=完整代码：5600批量修改6.5M.vbs#$language = VBScript#$interface = 1.0Dim g_szErrorsSub Main()const ForReading = 1, ForWriting = 2, ForAppending = 8 Dim objFso, objShell, objTextStream, szLineSet objFso2 = CreateObject(Scripting.FileSystemObject) Set file2= objFso2.OpenTextFile(e:Easyfail5100.txt, 8, True) Set objFso = CreateObject(Scripting.FileSystemObject) Set objShell = CreateObject(WScript.Shell) szSessionsFile = e:Easy5100.txt if Not objFso.FileExists(szSessionsFile) then crt.Dialog.MessageBox Session list file not found: & vbcrlf & _ vbcrlf & _ szSessionsFile & vbcrlf & vbcrlf & _ Create a session list file as described in the description of & _ this script code and then run the script again. exit sub end if Set objTextStream = objFso.OpenTextFile(szSessionsFile, 1, false) Dim szSessionDo While Not objTextStream.AtEndOfStream line1 = line1=Trim(objTextStream.ReadLine) if line1= thenexit subend ifDim objTabSet objTab = crt.GetScriptTabobjTab.Screen.Synchronous = TrueobjTab.session.LogFileName = e:Easylog & Date() & &line1 & .txt objTab.session.Log(true)objTab.Session.Connect /telnet & line1 on error resume next if objTab.Session.Connected then objTab.Screen.Synchronous = True crt.sleep 2000objTab.Screen.WaitForString : objTab.Screen.Send root & chr(13)objTab.Screen.WaitForString chr(10) & chr(13) & Password (objTab.Screen.Send en & chr(13)objTab.Screen.WaitForString #objTab.Screen.Send conf t & chr(13)objTab.Screen.WaitForString (config)#objTab.Screen.Send show board 0&vbcr&vbcrstr2=objTab.Screen.ReadString(#)str3=RePlace(str2, AD,)len1=Len(str2)len2=Len(str3)dim nc,nxnc=0nx=0nc=(len1-len2)/3nx=CInt(nc)msgbox(nx&nx)dim z,x,c,str4,op3op3=0str4=objTab.Screen.Send adsl line-p add & chr(13)objTab.Screen.WaitForString :objTab.Screen.Send chr(13)objTab.Screen.WaitForString 0: objTab.Screen.Send 1 & chr(13)objTab.Screen.WaitForString n:objTab.Screen.Send chr(13)objTab.Screen.WaitForString 0: objTab.Screen.Send chr(13)objTab.Screen.WaitForString n: objTab.Screen.Send chr(13)objTab.Screen.WaitForString 1:objTab.Screen.Send chr(13)objTab.Screen.WaitForString n:objTab.Screen.Send chr(13)objTab.Screen.WaitForString n: objTab.Screen.Send y & chr(13)objTab.Screen.WaitForString 32: objTab.Screen.Send chr(13)objTab.Screen.WaitForString 32000: objTab.Screen.Send 1024 & chr(13)objTab.Screen.WaitForString 32: objTab.Screen.Send chr(13)objTab.Screen.WaitForString 3000: objTab.Screen.Send 512 & chr(13)objTab.Screen.WaitForString (config)#objTab.Screen.Send show adsl line-p & chr(13)objTab.Screen.Send chr(13)str1=objTab.Screen.ReadString(#)if str1= then exit subend ifop1=InStrRev(str1,1024)msgbox(str1)q1=Mid(str1,op1-23,2)msgbox(q1)band=Mid(str1,o