小编Rem*_*igo的帖子

替换部分超链接

我需要修改.xls工作簿中的很多超链接.我的链接是这样的:

\\\mysrv001\some\path\documents.doc我需要更换\\\mysrv001\\\mysrv002

我试过这样的东西,但是我收到一个错误:"对象不支持这个属性或方法".我该如何解决?

Sub test()
    Dim hLink As Hyperlink
    Dim wSheet As Worksheet
    Dim path As String

    For Each wSheet In Worksheets
       For Each hLink In wSheet.Hyperlinks
            path = Right(hLink, Len(hLink) - 11)
            hLink.Address = "\\mysrv003\" & path
        Next hLink
    Next
End Sub
Run Code Online (Sandbox Code Playgroud)

PS:我正在使用Office 2000

excel vba excel-vba

3
推荐指数
2
解决办法
2万
查看次数

打开另一个用户注册表设置

我想编写一个应用程序,向本地计算机上的所有用户写入指定的密钥(例如:我想将所有用户的IE收藏夹的位置设置为同一文件夹)

PS有人用过这些功能吗?LoadUserProfile RegOpenCurrentUser CreateProcessAsUser

windows registry

2
推荐指数
1
解决办法
7389
查看次数

为TMemo/TRichEdit提供更多内存

有没有办法为Memo或RichEdit分配更多内存(如果使用大文件)

谢谢

delphi

1
推荐指数
1
解决办法
605
查看次数

检测点击PHP中的提交按钮

我有一个php文件,其中包含一个用于更新联系人的表单(包含2个输入框和一个提交按钮).我设法用联系人的数据填充字段,但我无法检测是否单击了提交按钮

表格看起来像这样

echo "<form action=Contact.php><table>".
"<tr><td>First Name</td><td><input type=text size=75% name=FirstName value='".$row['FirstName']."'></td></tr>".
"<tr><td>Last Name</td><td><input type=text size=75% name=LastName value='".$row['LastName']."'></td></tr>".
"<tr><td colspan=2><input type=submit name=UpdateContact value=Update></td></tr>".
"</table></form>";
Run Code Online (Sandbox Code Playgroud)

如果单击该按钮,此代码应输出"单击"消息

if (isset($_POST['UpdateContact']))
{
   echo "<p>clicked";
}
else
{
   echo "<p>not clicked";
}
Run Code Online (Sandbox Code Playgroud)

任何人都可以帮助我或告诉我我做错了什么

(我希望从相同的php文件中填充联系人的数据并从中更新数据库)

php

1
推荐指数
1
解决办法
2万
查看次数

vb.net中的线程测试

我正在尝试学习多线程,我坚持这个样本

Imports System.Threading

Public Class Form1

   Dim myThread As System.Threading.Thread = New Thread(AddressOf Me.AddItems)


   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      myThread.Start()
   End Sub

   Public Sub AddItems()
      Dim i As Int32
      Dim n As Int32 = 1
      Dim s As String = ""

      For i = 0 To 100
         s = n.ToString
         ListBox1.Items.Add(s)
         n *= 2
         Thread.CurrentThread.Sleep(100)
      Next
   End Sub

End Class
Run Code Online (Sandbox Code Playgroud)

我收到以下错误:

"跨线程操作无效:控制'ListBox1'从其创建的线程以外的线程访问"

vb.net multithreading

0
推荐指数
1
解决办法
175
查看次数

标签 统计

delphi ×1

excel ×1

excel-vba ×1

multithreading ×1

php ×1

registry ×1

vb.net ×1

vba ×1

windows ×1