cy's Blog 好好学习 天天上网

xls xlsx格式转换csv方法

Sub 批量转换()
Application.DisplayAlerts = False
t = ActiveWorkbook.Name
mypath = ActiveWorkbook.Path & "\"
myfile = Dir(mypath & "*.xls")
Do Until Len(myfile) = 0
    If myfile <> t Then
        Workbooks.Open Filename:=mypath & myfile
        ActiveWorkbook.SaveAs Filename:=mypath & Left(myfile, InStr(myfile, ".") - 1) & ".csv", FileFormat:=xlCSV
    End If
    If myfile <> t Then ActiveWorkbook.Close
    myfile = Dir
Loop
Application.DisplayAlerts = True
End Sub

打开xls 或者xlsx文件 然后选工具 宏 执行VB脚本

作者:lcy 分类:技术文章 浏览:86 评论:0

华硕笔记本开机自动进bios的问题 解决办法

解决的办法:在bios下选择Security-->Secure Boot Management按回车进入设置菜单;将Secure Boot 改为Disabled,然后选择Boot进入启动设置,将Fast Boot设为disabled ,将Launch CSM设为Enabled; F10保存设置。重启进系统不再进bios

作者:lcy 分类:故障解决 浏览:65 评论:0

监测网卡断网后自动重启网卡

@echo off
echo "网卡自动重启服务正在进行中......."

:begin
ping g.cn>ping.txt 
rem echo %errorlevel%
if %ERRORLEVEL% == 1 goto ping2
goto loop
 
:ping2
ping baidu.com>ping.txt 
rem echo %errorlevel%
if %ERRORLEVEL% == 1 goto reboot
goto loop
 
:reboot
cmd /c netsh interface set interface name="本地连接" admin=DISABLED
cmd /c netsh interface set interface name="本地连接" admin=ENABLED
将以上代码复制到记事本,另存为net.bat
利用任务计划定期执行此bat程序即可实现定时检测网络是否正常,如果不正常则会自动重启。


作者:lcy 分类:技术文章 浏览:82 评论:0

由于其配置信息(注册表中的)不完整或已损坏,Windows 无法启动这个硬件设备。 (代码 19)

在任务栏上点“开始”菜单,点运行,输入regedit后按确定打开注册表编辑器,在左边依次展开到 


exe,进入注册表编辑器,到左边的项目栏里找到 HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E965-E325-11C E-BFC1-08002BE10318}选定,在右面窗口找到upperfilter”项和“loweverfilter”项。点右键删除“upperfilter”项和“loweverfilter”项

作者:lcy 分类:技术文章 浏览:65 评论:0

centos 7 设置固定IP

cd  /etc/sysconfig/network-scripts
ls (看网卡名字 默认 ifg-eth0)
vi ifg-eth0
按下insert进入编辑模式
改以下
OTPROTO=static(默认是dhcp)
ONBOOT=yes (默认是no)
添加以下
IPADDR=192.168.1.123(需要设置的IP)
NETMASK=255.255.255.0(掩码)
GATEWAY=192.168.1.1(网关)
DNS1=114.114.114.114(云DNS)
按ESC 输入:wq 回车退出
重启网卡service network restart
OK 设置成功


作者:lcy 分类:Linux之路 浏览:115 评论:0

中国姓名排行TOP500(来自人口数据库)

$ smtp-user-enum.pl -M VRFY -U users.txt -t 10.0.0.1 
Starting smtp-user-enum v1.0 ( http://pentestmonkey.net/tools/smtp-user-enum ) 

  ---------------------------------------------------------- 
|                   Scan Information                       | 
  ---------------------------------------------------------- 

Mode ..................... VRFY 
Worker Processes ......... 5 
Usernames file ........... users.txt 
Target count ............. 1 
Username count ........... 47 
Target TCP port .......... 25 
Query timeout ............ 5 secs 
Relay Server ............. Not used 

######## Scan started at Sun Jan 21 18:01:50 2007 ######### 
root@10.0.0.1: Exists 
bin@10.0.0.1: Exists 
daemon@10.0.0.1: Exists 
lp@10.0.0.1: Exists 
adm@10.0.0.1: Exists 
uucp@10.0.0.1: Exists 
postmaster@10.0.0.1: Exists 
nobody@10.0.0.1: Exists 
ftp@10.0.0.1: Exists 
######## Scan completed at Sun Jan 21 18:01:50 2007 ######### 
9 results. 

47 queries in 1 seconds (47.0 queries / sec)



$ ./smtp-user-enum.pl -D example.com -M RCPT -U users.txt -t 10.0.0.1 
Starting smtp-user-enum v1.1 ( http://pentestmonkey.net/tools/smtp-user-enum ) 
---------------------------------------------------------- 
|                   Scan Information                       | 
---------------------------------------------------------- 
Mode ..................... RCPT 
Worker Processes ......... 5 
Usernames file ........... users.txt 
Target count ............. 1 
Username count ........... 47 
Target TCP port .......... 25 
Query timeout ............ 5 secs 
Target domain ............ example.com 

######## Scan started at Wed Jan 16 20:43:58 2008 ######### 
10.0.0.1: bin@example.com exists 
10.0.0.1: daemon@example.com exists 
10.0.0.1: root@example.com exists 
10.0.0.1: postmaster@example.com exists 
######## Scan completed at Wed Jan 16 20:43:58 2008 ######### 
4 results.

作者:lcy 分类:心情随笔 浏览:294 评论:0

内部错误 - 具有指定名的磁盘组已存在 (C100007A)

客户VPS 重装系统之后 磁盘出现问题  

在磁盘管理这里导入外部磁盘
失败
在系统事件簿上看到:
【内部错误 - 具有指定名的磁盘组已存在  (C100007A).】
解决办法:
打开“注册表编辑器”,依次展开HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\dmio \Boot Info,在Boot Info 项下删除“Primary DiskGroup”(主要磁盘组)项,关闭注册表并重新启动计算机。再次尝试导入外部磁盘。
   

作者:lcy 分类:技术文章 浏览:141 评论:0

指定FTP端口范围

运行
C:\Documents and Settings\Administrator>c:\inetpub\adminscripts\adsutil.vbs set /MSFTPSVC/PassivePortRange "20000-20500"
成功后看到
PassivePortRange                : (STRING) "20000-20500"
最后要重起IIS

作者:lcy 分类:技术文章 浏览:84 评论:0

Discuz云平台忘记绑定QQ 或者域名被别人绑定的处理办法

自己更换云平台绑定QQ号的方法

些站点在建站的过 程中经常是别人帮忙建站,开通云平台可能就用了其他人的QQ号,站点建好之后,站长又想换回自己的QQ号来管理,但是Discuz! 云平台为了安全,不给站长自己更换绑定QQ的功能,只能联系官方工作人员提交认证资料信息进行更换QQ。并且要求是没有开通过漫游应用和广告联盟的站点, 而很多站长测试的时候就都点了开通漫游应用,因而一直无法更换云平台绑定的QQ。

 

本方法是重新开通云平台来绑定到其他QQ上,并不能删除之前QQ绑定的记录,但是以前的QQ对你站点不再起任何作用。本方法适用于可以删除之前云平台数据的站点,如果不是新开通云平台的站点,这个方法一般不适用。

作者:lcy 分类:技术文章 浏览:170 评论:0