http://blog.csdn.net/lion_wing/category/330970.aspxzh-CNMon, 25 Aug 2008 15:51:00 GMT60凤之焚http://blog.csdn.net/lion_wing/archive/2008/08/25/2827884.aspxMon, 25 Aug 2008 15:49:00 GMThttp://blog.csdn.net/lion_wing/archive/2008/08/25/2827884.aspxhttp://blog.csdn.net/lion_wing/comments/2827884.aspxhttp://blog.csdn.net/lion_wing/archive/2008/08/25/2827884.aspx#Feedback0http://blog.csdn.net/lion_wing/comments/commentRss/2827884.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=2827884<P><A id=AjaxHolder_ctl01_TitleUrl href="http://www.cnblogs.com/macroxu-1982/archive/2007/02/05/640725.html"><U><FONT color=#0000ff>在SQL server 2000 中 如何更新表中的text、ntext 或 image 字段信息</FONT></U></A> </P> <P><A href="http://www.cnblogs.com/macroxu-1982/archive/2007/12/07/640725.html">http://www.cnblogs.com/macroxu-1982/archive/2007/12/07/640725.html</A></P><img src ="http://blog.csdn.net/lion_wing/aggbug/2827884.aspx" width = "1" height = "1" />凤之焚http://blog.csdn.net/lion_wing/archive/2007/09/19/1790729.aspxWed, 19 Sep 2007 09:22:00 GMThttp://blog.csdn.net/lion_wing/archive/2007/09/19/1790729.aspxhttp://blog.csdn.net/lion_wing/comments/1790729.aspxhttp://blog.csdn.net/lion_wing/archive/2007/09/19/1790729.aspx#Feedback0http://blog.csdn.net/lion_wing/comments/commentRss/1790729.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1790729在开启了系统Guest用户的情况下解除对Guest账号的限制，点击“开始→运行”，在“运行”对话框中输入“GPEDIT.MSC”，打开组策略编辑器，依次选择“计算机配置→Windows设置→安全设置→本地策略→用户权利指派”，双击“拒绝从网络访问这台计算机”策略，删除里面的“GUEST”账号。这样即使不开启guest，你也可以通过输入本地的账户和密码来登录你要访问的计算机，本地的账户和密码为你要访问的计算机内已经的账户和密码。不能访问主要是由于XP默认不开启guest，而且即使开了guest，XP默认是不允许guest从网络访问计算机的。<img src ="http://blog.csdn.net/lion_wing/aggbug/1790729.aspx" width = "1" height = "1" />凤之焚http://blog.csdn.net/lion_wing/archive/2007/08/28/1762051.aspxTue, 28 Aug 2007 14:20:00 GMThttp://blog.csdn.net/lion_wing/archive/2007/08/28/1762051.aspxhttp://blog.csdn.net/lion_wing/comments/1762051.aspxhttp://blog.csdn.net/lion_wing/archive/2007/08/28/1762051.aspx#Feedback0http://blog.csdn.net/lion_wing/comments/commentRss/1762051.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1762051 Option Compare DatabaseType ServerInfo Name As String UID As String PWD As StringEnd TypeType DBInfo SVInfo As ServerInfo DBName As StringEnd Type'-----------------------------------------------'功能:批量导入目录下所有xls文件到sql server'DBInfo:数据库连接信息'xlsPath:xls文件路径'-----------------------------------------------Sub ExcelImportSqlServerInPath(DBInfo As DBInfo, xlsPath As String) If Right(xlsPath, 1) "\" Then xlsPath = xlsPath + "\" En<img src ="http://blog.csdn.net/lion_wing/aggbug/1762051.aspx" width = "1" height = "1" />凤之焚http://blog.csdn.net/lion_wing/archive/2007/08/28/1762028.aspxTue, 28 Aug 2007 14:10:00 GMThttp://blog.csdn.net/lion_wing/archive/2007/08/28/1762028.aspxhttp://blog.csdn.net/lion_wing/comments/1762028.aspxhttp://blog.csdn.net/lion_wing/archive/2007/08/28/1762028.aspx#Feedback0http://blog.csdn.net/lion_wing/comments/commentRss/1762028.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1762028'功能：批量另存为一个目录下的XLS文件'srcPath 源目录'desPath 目标目录'---------------------------------------Sub SaveAsExcelInPath(srcPath As String, desPath As String) If Right(srcPath, 1) "\" Then srcPath = srcPath + "\" End If If Right(desPath, 1) "\" Then desPath = desPath + "\" End If ChDir srcPath Dim f_name$ f_name = Dir(srcPath + "*.xls") While f_name "" SaveAsExcel srcPath, desPath, f_name f_name = Dir() We<img src ="http://blog.csdn.net/lion_wing/aggbug/1762028.aspx" width = "1" height = "1" />