没有一个事物是永恒的，包括利比亚

从个人的角度来看淘宝，完全可以看做是门口的菜市场，

买些零零碎碎的东西，可以去逛逛，买了不满意的，你就自认倒霉吧

马云也看到了这一点，现在想扭转这种局面，主推淘宝商城，想做大

不知道是否能拯救淘宝的命运

但是我还是看到了淘宝商城的漏洞

首先 客服不统一，留给最终用户太多接口，（把我的麻烦都留给你）

其次 鱼龙混杂，淘宝商城好多商城不是唯一的（同一种品牌商品，有多家商城）

还有就是售后服务的投诉期，呵呵

你家亲戚生病了，看了医生吃了药，挂了，假药

找生产厂家，生产厂家说药是半年前生产并售出的，

售出一个月内负责质量问题，现在超出时限了，

并且你买的药的也不是直接从生产厂家买的,你从谁哪里买的药，你找谁去

虽然是我生产的，但是我不管

关键是卫生管理部门也支持生产厂家，（收了保护费的么）

你自己是不是觉得以后不生病了？ 还是决定要去上吊？ 你妹的

本来就是一个菜市场，你却让卖菜都穿上西装，系上领带，

菜市场就因该有菜市场的本色， 不是超级市场！ 呵呵

最近学着海淘，对亚马逊的认知又提升了一层，

马云应该好好学学亚马逊，

实在学不会就学学京东吧

再再不会，那就赶紧打包上市，拿钱闪人算了

（1） 中央派员监督各地换届

          中纪委 中组部将督导各地换届风气

           个督导组在当地设立并公开举报电话，直接受理反应换届问题的举报？

     想当年，伟大领袖毛主席建国的时候，建立人民共和国，让人民来监督政府，所以我国的人民应该有监督政府执政的义务啊，但是我国国民疏于值守，没有尽责，没有尽到合格公民的职责，只能是由政府部门来出动人力提国民尽责。

      今年换届，我们村里不知道要换谁当村长了？ 村长是我见过的最大领导。至于镇上，县上谁当官，谁当什么官，我不晓得 ，做为一个想尽国民职责的P民， 我该如何尽责？

有些好奇，就在google上搜索了下，过去看看

没想一看，就放不下了，一连两天，把博客上的每篇文章都翻了一遍

呵呵！ 感触挺深！ 建议大家有空过去看看！

一个内心很丰富的人!

看好多人都在SINA BLOG,心中突然飘过一丝搬家的念头！

以后吧！

闲暇之余，用自己的3g上网卡看youku电影，记得前天还有1.5G的流量，可是电影还没看完，无线网络就连不上了，还以为是F3507的问题，以前51NB有人经常说3507半小时断线，我的倒不是断线，而是流量计数全部归零，看不出你本次用了多少流量。

 经过几次联网测试，依然都没连上，后来想是不是由于流量超出而导致没话费了，不由得心里一惊，联通3G以其高速和流量费高而出名，一不小心超出千儿八百的很正常，用自己的手机呼叫3g上网卡的电话，果然是停机状态，晕死，中招了

 后来找了个网吧，查了下流量，2300M， 呵呵   超出部分流量话费100人民币，其实也就是300M的流量而已。

想想有些后怕，幸亏账户中只有100，消耗光了停机了，如果账户里有1000的话，岂不是全部给联通贡献了？

前段看了个新闻，韩国正在建设高速宽带网，家庭用户实现1G高速接入，并且还要大大提高无线网络的速度，我想，韩国这样整，不知道韩国的收费标准是如何的？  建议韩国政府采纳下我国联通的经验和收费标准已经营销手段，等到家庭用户实现更高速网络接入的时候，可怜的高丽棒子一定会被五花八门的各种套餐搞的昏头转向，一不小心就消耗掉所有的花费在这陷阱上，可以更好的带通韩国GDP的增长。

想到了2000年的这个时候，我大学同学一起共度千禧年

呵呵 ， 10年光阴，转眼一瞬间， 仿佛就是昨天，

想想自己10年都做了些什么，收获了那些 ， 呵呵 不晓得！

人生就是这样， 选择了一条路， 永远都会怀念另外那条没有选择的路

祝新老朋友都过得开心！

虽然没有经过众人测试，不知道是否可以正常使用，

但是心里很是高兴，

有些事总是需要人去做的，

虽然当时很难，但是随着时间的推移

终究会出现的

引用地址http://tommy.net.cn/2010/11/23/lenovo-notebook-whitelist/

如果有人需要可以去看看，关键是现在没有那么多硬件进行测试

就像我的dir 655一样， 也许多年以后，UBICOM的dd wrt也就出来了

固然那个时候，可能我的655有可能已经报废！

呵呵

现在每次上网就10分钟， 以前常去的论坛不知道要看些什么

朋友们！ 你们现在除了日常工作之外， 生活的乐趣来自哪里呢？

都有什么样的消遣方式啊？   呵呵  ，  我真是不知道了！ 

看到这里都尘封了好久

更新下！

    蓝牙模块是带FRU的，装上去直接就ok，但是需要你安装驱动，

    懒人可以用system update来自动安装驱动

     不过system update没有迅雷的下载速度快，我是手工下载并安装的

     这里要说的一点是： 在拆小黑掌托的时候，有一颗螺钉是在硬盘支架的端盖下隐藏的

     你需要先拆下那个塑料盖上的螺钉，然后把塑料盖扣下来， 才能看到那可螺钉

     否则，掌托是插不下来的，这里一定要注意，如果你的螺丝全去掉了，

      那么掌托是很容易就拿下来的， 千万不要蛮干

      如果心里没谱，就是下载一个sl400的手册

       Hardware  Maintenance  Manual

      仔细看看，就全都明白了

      网上购买的原装蓝牙鼠标，看盒子是中国造韩国销售的东西，手感还可以

      我不会辨别真的假的，只有用钱来鉴别了，但是就这都不一定是真的，呵呵

      现在都很难说，不过手感还可以，比我那个5块的电鼠好些

     但是，这里要说的是： 感觉这款蓝牙鼠标没有老婆的那款方正V470 罗技代工

     蓝牙鼠标舒服，那个用着确实很舒服，比thinkpad 的这个蓝牙鼠标舒服多少

     心里还是少许遗憾，呵呵， 希望这款本子的原配以后能让我满意！

     如果能够重来，我愿意买罗技V470那款！

    最终还是买了一部行货的B5722，呵呵， 我有三星情节！这是我的第三部三星了。

    机器拿到手，赶紧测试一下，来电能够显示人名，并且手写输入都没问题，带全国联保发票

     不过三星的说明书写的太差了，很多功能都写的不够详尽，需要实际中去测试和体会。

     由于这部机器也是新机器，网上很少有相关的讨论，这里就将我所发现的使用体会记录下来，供广大朋友一起分享。

   （1） 双卡的切换

             手机右侧上方的是双卡切换键，短按 ，即可实现双卡的切换，当前主卡会有阴影显示

             长按，则会进入到双卡的设置和管理界面

             如果改变主卡启动顺序，则会重启以应用改变。

   （2） 游戏和程序的安装

             这个是和以前三星手机最大的不同点

             这款手机之需要把游戏或者程序拷贝到手机中，浏览到这个文件后，双击

             手机就会自动询问并安装程序

              以前好多三星手机需要刷固件或者用第三方软件传输，这款手机已经不需要了

   （3）  影音文件

              把制作好的影音文件拷贝到内存卡里，我装的是sandisk 8g class2的卡

              浏览到这个影音文件，双击，如果格式是支持的格式，则会自动给播放

              最爽的是，双击全屏， 则影音文件横着播放显示，很爽！

              我测试过mp4的格式文件，我自己转换的，结果显示不支持

              测试3gp格式，完全没有问题。

             目前为止，这是我的使用感受，觉得还是非常满意的一款双卡双待！

              呵呵，前两天不太会用，一直埋怨， 看来还是要实践中研究才行！

              如果有朋友也用这款手机的，有什么问题，可以一起交流！

遇到了电话号码簿导出和转入的问题

 我的老手机是E628,  使用的软件是Samsung PC Studio II 2.0 PIMS & File Manager

但是单纯的号码簿导出格式只能是ESB, 这是三星手机专用的老格式了

没有第三方的工具能够打开

到网上google了好一阵，好像用我这款手机的人不是很多，居然没有人遇到并解决E628的问题

不过好多其他的人都提到了部分解决问题的思路，虽然不适用于E628,但是，我却也是从他们的思路中得到启发， 由此，可以说： 三星Samsung PC Studio II 2.0管理软件的电话号码簿都可以通过我所用的方法实现号码导出。

   步骤如下：

     （1）  打开Samsung PC Studio II 2.0 PIMS & File Manager管理软件

               链接手机， 左下角倒数第三项是计算机

               拷贝所有电话号码后 ， 点击 左下角倒数第三项 计算机  然后粘贴

     （2） 关掉Samsung PC Studio II 2.0 PIMS & File Manager

     （3） 在Samsung PC Studio II 2.0 PIMS安装目录下，有一新生成的

               Samsung PC Studio.mdb

               可以使用office的access打开，它本身就是access的数据库

      看到了吧？ 呵呵 ，选择导出 ， 可以导出到excel或者其它你想要的文件中！

               呵呵！  你弄明白了吗？ 

如果手动GHOST，选择partion to image应该注意，如果目标分区是NTFS，有真假分区之分，真的是1.n的形式开头的，假的是以盘符如E:的形式出现的，必须选择真的。

否则就会出现上述的那种错误。

Ghost停留在adding MFT Table File to image......,然后就一直不动了

我就是这样解决上述问题的。

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim svcs As Services
        svcs = New Services             '初始化DWGDIRECT ODA服务

        Dim DB As Database
        DB = New Database(True, True)    '第二个参数无用  第一个控制是否初始化

        Dim btr As BlockTableRecord
        Dim tm As TransactionManager

        tm = DB.TransactionManager

        Dim tr As Transaction
        tr = tm.StartTransaction

        Using tr
            'Dim i As Integer
            Dim cir1 As Circle
            Dim line1 As Line
            Dim dbtext1 As DBText

            Try

                cir1 = New Circle
                cir1.Center = New Point3d(5, 5, 0)
                cir1.Radius = 44
                'Note that Point3d is not an entity; it does not have a graphical presentation and it is not stored in the database.

                line1 = New Line(New Point3d(150, 50, 0), New Point3d(250, 150, 0))

                dbtext1 = New DBText
                dbtext1.TextString = "HELLOW  DRX !"
                dbtext1.Height = 25
                dbtext1.Thickness = 10
                dbtext1.Color = Color.FromRgb(255, 20, 20)

                btr = DB.CurrentSpaceId.GetObject(OpenMode.ForWrite)

                btr.AppendEntity(cir1)
                btr.AppendEntity(dbtext1)
                btr.AppendEntity(line1)

                tm.AddNewlyCreatedDBObject(cir1, True)
                tm.AddNewlyCreatedDBObject(dbtext1, True)
                tm.AddNewlyCreatedDBObject(line1, True)

                tr.Commit()

            Catch ex As Exception

            End Try

        End Using            '  在中间的代码段 结束或异常时  tr.dispose         即使中间无任何代码

        tr = tm.StartTransaction
        Using tr

            Try
                Dim cir1 As Circle
                Dim line1 As Line
                Dim dbtext1 As DBText

                cir1 = New Circle
                cir1.Center = New Point3d(50, 50, 0)
                cir1.Radius = 44
                'Note that Point3d is not an entity; it does not have a graphical presentation and it is not stored in the database.

                line1 = New Line(New Point3d(150, 50, 0), New Point3d(250, 150, 0))

                dbtext1 = New DBText
                dbtext1.TextString = "JUST A JOKE !"
                dbtext1.Height = 0.2
                dbtext1.Thickness = 10
                dbtext1.Color = Color.FromRgb(255, 20, 20)

                btr = DB.CurrentSpaceId.GetObject(OpenMode.ForWrite)

                btr.AppendEntity(cir1)
                btr.AppendEntity(dbtext1)
                btr.AppendEntity(line1)

                tm.AddNewlyCreatedDBObject(cir1, True)
                tm.AddNewlyCreatedDBObject(dbtext1, True)
                tm.AddNewlyCreatedDBObject(line1, True)

                tr.Commit()

            Catch ex As Exception

            End Try

        End Using

        DB.SaveAs("C:\1.dwg", DwgVersion.AC1014)
        'ac1014 -----?  autocad R14
        'ac1015 -----? autocad 200
        'ac1021 -----? autocad 2007
        'ac1800 -----? autocad 2004
        'Current       autocad 2007
        DB.Dispose()
        svcs.Dispose()
        MsgBox("OK")

    End Sub

End Class

呵呵  世界从此与众不同

在此留念！

httx://wwx.opendwg.org

.Net component：
http://depositfiles.com/files/koxq5f067

ActiveX component：
http://depositfiles.com/files/xa8h7bqls

Imports OdaX
Imports DWGdirectX
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim odahost As DWGdirectX.OdaHostApp
        Dim app As DWGdirectX.AcadApplication
        Dim doc As DWGdirectX.AcadDocument
        Dim stType As DWGdirectX.OdSaveAsType
        stType = OdSaveAsType.odR18_dwg
        'Odr21---------->autocad 2007
        'Odr18---------->autocad 2004

        Dim point1(2) As Double
        Dim point2(2) As Double

        odahost = CreateObject("DWGdirectX.OdaHostApp")
        app = odahost.Application
        doc = app.Documents.Add()
        doc.Activate()

        point1(0) += 10
        point1(1) += 10
        point1(2) += 0

        point2(0) += 100
        point2(1) += 100
        point2(2) += 0

        doc.ModelSpace.AddLine(point1, point2)
        doc.SaveAs("c:\1.dwg", stType)

        doc.Close()
        app.Quit()
        odahost = Nothing

        MsgBox("ok")

很早以前是非常难找的，以至于有人在销售这个东西，呵呵

估计也没有人买吧，有需要的人才会买，但是需要的人不会从私人手里买

不错的东西，和以前autocad vba开发的代码99%兼容

使用autocad vba的人，可以顺利过渡到这个

可能以后写代码的机会很少了，记录下来，给需要的人。

也做个纪念！