温水煮青蛙

以为是反弹了 追 结果第二天暴跌

以为还跌 割 结果反弹了….

哪里是底???底下还有地下室呢

听说3800点有强支撑,什么玩意?

听说代表最广大人民群众的利益,逗我玩吧?

VBA中获取文件名的方法

在用excel做文件导入时发现,一旦使用Commond Dialogs 就会出错

“The control could not be created because it is not properly licensed”

原因是,Commond Dialogs are not licensed to be used in Excel。经过搜索发现,其实VBA还有其它的法子获得文件路径。

Private Function OpenDialog() As String
     Dim sFile As String
     Dim n As Integer
     '获取路径
     sFile = Application.GetOpenFilename("MS excel (*.xls), *.xls")  
     '获取文件title的长度
     n = Len(sFile) - InStrRev(sFile, "\") 
     '获得文件title
     tt = Right(sFile, n) 
End Function

Lotus Notes 8 好用看得见

晚上去网上下载了notes最新的客户端,感觉非常好用。不过最大的问题还是打开的时候略显缓慢,感觉上占用系统资源较多。
在安装的过程中,发现不能直接在notes 7的基础上进行升级,提示升级无法完成。只有当卸载NOTES7后,安装才能继续,不过中间发生了很多的问题,居然提示找不到.provisioning_rc,按照ibm网站提示:用命令行> msiexec /i “Lotus Notes 8.0.msi” /qb+ 进行安装,虽然安装成功了,但无法打开。
没办法,最终卸载了notes8,然后到注册表中将涉及NOTES的注册信息删除,重新启动计算机后,再次安装,一次成功。

kvzozzs4|yupoo.com
0j4ve4fb|yupoo.com
puof0ypl|yupoo.com
ldqkl6o6|yupoo.com
bmqd7vrn|yupoo.com

推荐一首我最喜欢的歌-Bizarre Love Triangle

Bizarre Love Triangle
Every time I think of you
I feel shot right through with a bow of gloom
It’s no problem of mine
But it’s a problem I find
Living a life that I can’t leave behind
There’s no sense in telling me
The wisdom of a fool won’t set you free
But that’s the way that it goes
And it’s what nobody knows
While every day my confusion grows

Every time I see you falling
I get down on my knees and pray
I’m waiting for that final moment
You’ll say the words that I can’t say

I feel fine and I feel good
I’m feeling like I never should
Whenever I get this way
I just don’t know what to say
Why can’t we be ourselves like we were yesterday
I’m not sure what this could mean
I don’t think you’re what you seem
I do admit to myself
That if I hurt someone else
Then I’ll never see just what we’re meant to be