2012-04-2
无题
感觉很失落。
一定要重新找到重心！
一定会的 是吧 加油
不要等待，不要等待了 不要再等待了
2012-03-28
价格的敏感性
买东西的人对价格的敏感性远要高于卖东西的人。很少客户在网上买东西，会点开一个页面立马下单。所以不要误以为让自己的主词排名尽量靠前，就可以意味着价格就可以高于排名次之的网站很多。最终辛苦做上排名，你的转化率还是流向别人的网站。
况且，很多给网站带来转化的搜索词是一些经常变化的长尾词，甚至可能今天搜了这个词，明天不一定有人在网络上搜这个词。当然网站权重够高，网站内容够丰富，就不用担心长尾词。
原价80欧元的产品，卖28欧元和卖22欧元，都可能给用户带来一定的质疑。假设一个转化率很高的词，排第一的网站卖28欧元，排第二的网站卖22欧元，你会选择在哪个网站下单。假如你觉得应该有10个单，最终只有1个单，当然要从多方面考虑。但是价格也是要测试的。
赚多少 无非是简单的加减乘除。
2012-03-25
网站价格是需要调试的
价格是需要调试的，比如你一单赚70 有5单，总共赚350。但是如果你觉得网站转换率比预想的低，可以适当降低价格，这时你一单可能赚50 ，但变成10单（这是很有可能的，有时候降低一些价格，转换率却大大提升，挺常见的），你赚了500.网站的价格也需要调试，达到最优化的效果。道理简单的不用脑袋都可以理解，但太多人太放不开，老想着，降低价格，我少赚了，其实未必！
2012-03-25
谷歌最近怎么了
谷歌最近怎么了，又两个站一摸样抄袭，连首页标题，描述都不改，模板也一样，好像进入我们空间，直接盗走数据那样，就域名不一样，居然排名和我们差不多。
而最近我们的新站，网站数据都尽量原创,推广也小心翼翼，居然老是出问题，首页被降权或是进沙盒。
到底怎么了，怎么了
2012-03-17
我的反射弧是不是比别人长好多
心血来潮，报了舞蹈班，学jazz的。才上了几天，很想放弃了，无论是基础班还是成品舞，我都完全跟不上啊。每次上课，都脑子一片浆糊，脸烧得通红，紧张得厉害，还有点想哭。老大不小的一个人混在一群小朋友中间，因为笨拙得厉害，无论站在哪个角落都无处藏身。
凡是有逻辑的东西，我都会有信心学得不那么差，就比如1+1=2，接下来找到方法，懂得原理，就知道要2+2=4。但是体育和舞蹈，貌似都考验肢体的灵活性。初中体育上课练跳绳，很多同学只要看老师跳一遍，就懂了，在别人眼里这么简单的动作，对我来说，动作协调都成问题，初三下学期开始一直练到体育统考，每天放学吃完饭就开始练，练到晚上宿舍熄灯，还在练。高中军训，因为左右总是反应不过来，被教官骂：这么笨，你是怎么考上一中的，是花钱买进来的吧。简直就是吃大便的。当场捂住脸哭了。大学体育课，经常不及格，老师说他可以给我及格，但是给我加了多少分达到及格，也要给其他同学加一样的分数，于是和我一起上体育课的同学大部分都是85分以上，而我刚好60分。
这几天我一直在考虑要不要放弃。工作这边也有压力，每天一下班匆匆吃下饭就去，但什么都学不会，怎么都学不会，很尴尬，不知道该摆什么表情，只能一直傻笑。居然有个姑娘说挺喜欢我这样，爱笑还又白又漂亮。稍稍又有了点自信，我想啊，我长得不算丑，大家会不会原谅我这样的突兀呢，不会嫌恶我呢。
到底要不要放弃，这对别人来说很简单，但是对我来说真的很纠结。到底是不是我的反射弧比别人长好多，到底是不是小脑很不发达。一旦我放弃了，一切都无从考证了。
2011-12-24
如何合并多个excel的统计表格文件到1个文件当中(用得着，mark下,注意引号)
Sub 合并当前目录下所有工作簿的全部工作表()
Dim MyPath, MyName, AWbName
Dim Wb As Workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & “\” & “*.xls”)
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> “”
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & “\” & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
If Num = 1 Then
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range(“A65536″).End(xlUp).Row + 1, 1)
Next
Else
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Offset(1, 0).Copy .Cells(.Range(“A65536″).End(xlUp).Row + 1, 1)
Next
End If
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range(“A1″).Select
Application.ScreenUpdating = True
MsgBox “共合并了” & Num & “个工作薄下的全部工作表。如下：” & Chr(13) & WbN, vbInformation, “提示”
End Sub
2011-12-23
记事内容要写短点了，争取再短点。
今天，有点沮丧，心软剔得不够干净。
经理说开除掉某人吧。其实经理的愤怒我能理解。因为经理白天不在公司，直接用人的人是我，我也很愤怒。但我还想第几次给机会。
情绪的点很低，容易冲动。但是我的底线还真低啊。但是你非得高调到逼我做出选择的话，我也实在没办法了。
还有今天和一个同事争执了起来，很冲动很冲动，UP,UP，罢了，罢了，像以往那样回宿舍洗洗，躺床上看看书，顺便意淫下。注意是意淫哦。
