http://dev.firnow.com/course/3_program/c++/cppsl/20071119/86940.html

guarantee by 2010-6-21 18:45:00
阅读全文 | 回复 | 引用通告

问题例如：我的"事件查看器"的"系统"里出现：DCOM 遇到错误“无法启动服务，原因可能是已被禁用或与其相关联的设备没有启动。 ”，试图以参数“”启动服务 StiSvc 以运行服务器: {A1F4E726-8CF1-11D1-BF92-0060081ED811} 解决方法。

解决方法：如果你根据系统的提示操作，试图使用组件服务管理工具修改此安全权限是无法奏效的。有效方法是在注册表中修改相关键值，运行注册后，定位于

HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{6FE54E0E-009F-4E3D-A830-EDFA71E1F306}
再查看右侧视图，记住“AppID”对应数值数据“{27AF75ED-20D9-11D1-B1CE-00805FC1270E}”


此后，打开“组件服务”，依次选择“组件服务”→“计算机”→“我的电脑”→“DCOM配置”，点击菜单栏“查看”→“详细信息”，再在右侧视图中找到ID为“{27AF75ED-20D9-11D1-B1CE-00805FC1270E}”的应用程序“netman”，用鼠标右键单击，选择“属性”，在弹出窗口中切换到“安全”标签页，在“启动和激活权限”项目中点击“编辑”按钮，然后在弹出的“启动权限”对话框中添加“NETWORK SE
……

guarantee by 2010-3-7 2:02:00
阅读全文 | 回复 | 引用通告

在form_load事件中,把"D:\123"下所有后辍名为ini的文件名加载到combo1.list中,但combo1显示上没有后辍(只取前辍).如何实现，要详细的 

guarantee by 2009-12-17 10:55:00
阅读全文 | 回复 | 引用通告

如果你安装了Mathtype，运行word后，打开相当慢，显示“正在运行病毒扫描”！ 解决方法如下：

 到C:\Program Files\Microsoft Office\OFFICE11\STARTUP下（假定OFFICE装在了这个路径下），找到两个文件MathPage和MathType Commands 5 For Word，删除这两个文件，然后重新启动WORD，就会很快打开word了。

一个比较完整的解决方案：打开Office 2003 的Word时速度较慢，左下角显示“正在运行病毒扫描"，影响了WORD打开的速度。这是因为安装了公式编辑器Mathtype5.0 Equation的缘故。在装这个工具软件时，会在Office 的安装路径中装上了自动启动的WORD模板，每次打开WORD文件时，就会以这个模板的默认方式打开，而启动WORD时Office自带的宏病毒扫描程序就会自动进行病毒扫描。所以，如果想取消这个病毒扫描过程，可以步骤如下：

 1、先打开杀毒软件，到设置 －>详细设置下，找到嵌入式杀毒，然后将”使用Office/IE嵌入式杀毒”前面的勾取消。

2、到杀毒软件的监控中心，取消“启用文件监控”设置。

guarantee by 2009-11-28 13:29:00
阅读全文 | 回复 | 引用通告

问题描述：打开以前做的程序，有的程序直接就遇到问题需要关闭，有的程序进去了，但打开不了窗体，每次打开窗体就弹出遇到问题需要关闭，我点不发送，然后VB就自动关了，但程序是没有问题的．另完全卸载VB，重装后问题依然存在。

解决办法：开始运行里输入 regsvr32 MSSTDFMT.DLL

So Easy!

guarantee by 2009-9-28 15:03:00
阅读全文 | 回复 | 引用通告

方法其实方法很ＥＡＳＹ，

１．让IIS支持ASPX,添加Web服务扩展的方法

打开ＩＩＳ，本地计算机，右击"默认网站"点"所有任务"再点"添加Web服务扩展"，这样就有Web服务扩展了，有了这个，那该IIS也就支持aspnet了．

如果有了Web服务扩展还不支持aspnet的话，则，继续下面的方法：

一、先注册asp.net组件： (asp.NET 组件即：.Net Framework )

　　开始－＞运行－＞cmd－＞执行命令：

C:\windows\Microsoft.NET\Framework\v2.0.50727\aspnet_regiis.exe -i （你的.net组件位置）

二、接下来还要在WEB服务扩展启用ASP.NET服务：

　　IIS－＞本地计算机－＞WEB服务扩展－＞ASP.NET v2.0.5072：允许

三、在IIS中创建虚拟目录

IIS－＞本地计算机－＞网站－＞默认网站，右键－＞新建“虚拟目录”－＞取个名字－＞浏览你的ASPX文件的目录，确定

四、点击新建的虚拟目录－＞在右侧，右击：aspx文件－＞浏览

guarantee by 2009-9-23 12:50:00
阅读全文 | 回复 | 引用通告

设置picturebox.autoredraw=true

SavePicture Picture1.Image, "c:/1.jpg"

就这么简单。。。

guarantee by 2009-9-18 9:39:00
阅读全文 | 回复 | 引用通告

两直线求交点

Type GPoint
    x As Single
    y As Single
End Type

Public Sub Cro(P1 As GPoint, ByVal k1 As Single, P2 As GPoint, k2 As Single, ByRef Pc As GPoint)
    If k1 <> k2 Then
        Pc.x = (P2.y - P1.y + k1 * P1.x - k2 * P2.x) / (k1 - k2)
        Pc.y = k1 * (Pc.x - P1.x) + P1.y
    End If

    if k1=k2 Then

        Msgbox"两直线平行！无交点！"

guarantee by 2009-9-16 14:56:00
阅读全文 | 回复 | 引用通告

1.下载播放器改命为Player.exe

2.新建autorun.inf

   内容：[autorun]
              Label=***

              Open= autorun.exe

3.新建autorun.exe

  VB工程Formload事件代码：

              Shell App.path & "/Player.exe 1.rm"

              End

guarantee by 2009-9-11 16:06:00
阅读全文 | 回复 | 引用通告

好端端的原装BL-5B电池突然充不进电，郁闷好久。

据说可能是电池芯片保护了

解决办法：在插入线充时，拔下电池，连续重复一次。再正常充电，OK~！Good Luck~

guarantee by 2009-9-9 15:27:00
阅读全文 | 回复 | 引用通告

分析:

只是因为Dell电脑采用SATA硬盘,我们知道, 目前SATA硬盘工作在两种模式下,一种是”ATA模式”(”兼容”模式,”标准” 模式,将SATA硬盘映射到系统的IDE通道上；第二种是”AHCI”模式,在BIOS中,可以在这两种模式中选择(出厂和ALT+F都默认成”AHCI”).

如果在BIOS中将”SATA Operation”设置为”AHCI”模式,安装Windows XP的时候,需要SATA的驱动支持.如果客户购买的是Windows XP,用随机配的XP光盘安装,则可以顺利安装；但是如果客户购买的是Vista或者N系统,用不包含SATA驱动的XP光盘(比如早先的Dell机器所配Windows XP光盘),就会出现该问题.

由于Vista原本就支持AHCI,因此,安装Vista一般不会有这样的问题.

解决方法:

guarantee by 2009-9-5 12:25:00
阅读全文 | 回复 | 引用通告

网上看到很多提出“忘记Administrator密码该怎么办？”的问题。

有人说将主板电池扣下放电可以解决之类的回答。。。这只是消除主板Bios密码，与系统无关。

正确办法：1.制作U盘PE系统（注意，若电脑为vista系统，U盘PE最好用VISTA PE）；

                  2.电脑Bios设置USB启动，启动U盘PE；

                  3.进入PE，打开电脑系统盘（C盘），进入C:/windows/system32/config/文件夹，删除SAM文件。

guarantee by 2009-9-2 11:08:00
阅读全文 | 回复 | 引用通告

下载附件，将a.jpg改成a.rar，再解压看看。see~~~

附件图片

guarantee by 2009-9-1 12:50:00
阅读全文 | 回复 | 引用通告

解压附件，将cnMouseWheelPlugIn.dll拷到VB安装根目录下——>工程-引用-浏览，选择cnMouseWheelPlugIn.dll——>OK.Good Luck!

附件

guarantee by 2009-9-1 12:05:00
阅读全文 | 回复 | 引用通告

Sub addMenu() '菜单
Dim Popup(1)
Dim Button(5) As CommandBarControl
Set aa = Application.CommandBars(3).Controls.Add
Set Popup(0) = Application.CommandBars("Worksheet Menu Bar").Controls.Add(Type:=msoControlPopup, temporary:=True)
Popup(0).Caption = "☆工具☆"
Popup(0).Tag = "bb"
Set Button(1) = Popup(0).Controls.Add(Type:=msoControlButton, temporary:=True)
Button(1).Caption = "菜单一"
Button(1).OnAction = ""
Set Button(2) = Popup(0).Controls.Add(Type:=msoControlButton, temporary:=True)
Button(2).Caption = "菜单二"
Button(2).OnAction = ""
Butto
……

guarantee by 2008-7-24 8:32:00
阅读全文 | 回复 | 引用通告

Sub testMenu()
Dim menug As AcadMenuGroup, pmenu As AcadPopupMenu, pmi As AcadPopupMenuItem
    Set menug = ThisDrawing.Application.MenuGroups(0)
    Set pmenu = menug.Menus.Add("Test0")
    Set pmi = pmenu.AddSubMenu(0, "Test1").AddSubMenu(0, "Test2").AddSubMenu(0, "Test3").AddMenuItem(0, "Test4", "(princ ""Hello!"") ")
    Call pmenu.InsertInMenuBar(0)
End Sub

guarantee by 2008-7-24 8:29:00
阅读全文 | 回复 | 引用通告

自己写的程序~~

void DDAE(int xc,int yc,int a,int b) //DDA椭圆
{
    float x1,y1,x2,y2,x3,y3;
    int i;
    x1=(float)xc;
    y1=(float)(yc+b);

guarantee by 2008-6-28 14:10:00
阅读全文 | 回复 | 引用通告

void DDALine(int x0,int y0,int x1,int y1 )   //DDA画线
{
        int x,ytemp,p,Loc;
        float dx,dy,y,xtemp,k;
        dx=x1-x0;
        dy=y1-y0;
        if (abs(dx)>abs(dy))
        {
                k=dy/dx;
          
……

guarantee by 2008-6-28 14:09:00
阅读全文 | 回复 | 引用通告