标签: vbscript

我试图使用VBA将一些文本插入PowerPoint TextRange,我使用这样的东西:

ActiveWindow.Selection.SlideRange.Shapes("rec1").TextFrame.TextRange.Text = "Hi"

但是,我无法弄清楚如何以编程方式应用粗体,斜体和下划线(我没有看到.RichText属性或类似的东西).

我所拥有的是一些简单的HTML文本,其中包含我想要转换的粗体,斜体和带下划线的文本.

这该怎么做？

我见过的每个样本都使用存储过程.我采用了一个用Classic ASP编写的旧应用程序,它使用内联SQL.这是一个明显的问题,所以我需要将其转换为更安全的代码.客户端不希望我在此应用程序中使用存储过程,因此有没有办法在没有存储过程的情况下运行参数化查询？

谢谢

我试过下面的脚本,但是我收到一个错误:

dim cn, rs

set cn = CreateObject("ADODB.Connection")
set rs = CreateObject("ADODB.Recordset")
cn.connectionstring = "Provider=MysqlProv; Data Source=Adonis; User Id=mysqluser; Password = mysqlpass;"
cn.open
rs.open "select * from Countries", cn, 3
rs.MoveFirst
while not rs.eof
    wscript.echo rs(0)
    rs.next
wend
cn.close
wscript.echo "End of program"

它给出了以下错误:

C:\mysql.vbs(6, 1) ADODB.Connection: Provider cannot be found. It may not be pro
perly installed.

当我用Google搜索odbc连接器时,我来到这个页面,在那里我可以下载odbc 5.1连接器.想知道这是否足以连接到mysql服务器5.0数据库......？

我有以下格式:Value1是{0},Value2是{1}.

我需要用字符串替换括号中的数字.这在大多数语言中都可以使用string.Format或其他类似的东西轻松完成.我怎么能只使用vbscript呢？

我试过了:

Replace (strFormat, "{0}", value1)  
Replace (strFormat, "{1}", value2)

这是行不通的.有解决方案吗

我一直在使用ADO VBScript,它需要接受参数并将这些参数合并到传递数据库的Query字符串中.当记录集对象尝试打开时,我不断收到错误.如果我传递没有参数的查询,记录集将打开,我可以处理数据.当我通过调试器运行脚本时,命令对象不显示参数对象的值.在我看来,我错过了与Command对象和Parameter对象相关联的东西,但我不知道是什么.这里有一些VBScript代码:

...
'Open Text file to collect SQL query string'
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = "C:\SQLFUN\Limits_ADO.sql"
Set tso = fso.OpenTextFile(fileName, FORREADING)

SQL = tso.ReadAll

'Create ADO instance'
 connString = "DRIVER={SQL Server};SERVER=myserver;UID=MyName;PWD=notapassword;   Database=favoriteDB"
 Set connection = CreateObject("ADODB.Connection")
 Set cmd = CreateObject("ADODB.Command")

  connection.Open connString
  cmd.ActiveConnection = connection
  cmd.CommandText = SQL
  cmd.CommandType = adCmdText

  Set paramTotals = cmd.CreateParameter
  With paramTotals
       .value = "tot%"
       .Name = "Param1"
  End With

  'The error occurs on the next line'
  Set recordset = cmd.Execute

  If recordset.EOF …

我编写了一个小的VBScript来创建.zip文件,然后将指定文件夹的内容复制到该.zip文件中.

我出于某种原因逐个复制文件(我知道我可以一次完成所有这些).但是我的问题是,当我尝试在没有WScript的情况下逐个复制它们.在每次循环迭代之间,我得到一个"找不到文件或没有读取权限".错误; 如果我WScript.Sleep 200在每次写入后放置它有效但不是100%的时间.

我想摆脱Sleep功能并不依赖于它,因为根据文件大小的不同,写入可能需要更长的时间,因此200毫秒可能还不够.

正如您可以看到下面的一小段代码,我遍历文件,然后如果它们与扩展名匹配,我将它们放入.zip(zipFile)

For Each file In folderToZip.Items
    For Each extension In fileExtensions
        if (InStr(file, extension)) Then
            zipFile.CopyHere(file)
            WScript.Sleep 200
            Exit For
        End If
    Next
Next

关于如何停止依赖睡眠功能的任何建议？

谢谢

背景

一年前我必须在学校学习PHP,我已经知道ActionScript3所以它并不那么困难,并且和我的一个朋友一起,我们是学校的前两个用PHP学习OOP的人.这不是必需的,但我们认为这很重要.

去年我开始学习C#和ASP.NET,但我在C#和ASP.NET方面远非专业,我为自己做了一些项目,仅用于教育目的.

现在几天前我开始实习(这应该需要6个月)但是该公司仍然使用ASP Classic和VBScript.

题

是否值得去年学习ASP.NET和C#,现在启动ASP Classic和VBScript 6个月,之后可能继续使用ASP.NET和C#？

我想对此有一些看法,因为我不知道我是否应该留下来做ASP Classic,或者去寻找另一个我可以做ASP.NET的实习.

我正在尝试使用vbscript提交一些帖子数据表单。我将其发布到的站点包含一些Java，并且在标题中戳了一下，我注意到它正在发送一个cookie JSESSIONID，其中包含，我相信这与Java身份验证有关：

Cookie: JSESSIONID=XXXXXXXXXXXXXXXXXXXXX

当我只发送我想发送的地址和帖子数据并查看responsetext时，它会将我发送回java身份验证页面，这使我认为我需要检索jsessionid cookie并将其与数据一起提交。

这是我用来提交帖子数据的功能。对于简单的形式，这似乎可以正常工作，但是此页面上的java有点让我失望：

Function Fetch(URL, POST)

  Set WshShell = CreateObject("WScript.Shell")
  Set http = CreateObject("Microsoft.XmlHttp")
    http.open "POST", URL, FALSE
    http.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    http.send POST
  Fetch = http.responseText
 set WshShell = nothing
 set http = nothing  

End Function

我的问题确实是：该怎么做？我是否需要加载第一页，获取Cookie并使用表单重新提交它？如果是这样，我该如何检索服务器在标头中发送回的cookie？当我查看它们发送回的标题时，我可以看到：

Set-Cookie: JSESSIONID=XXXXXXXXXXXXXXXXXXXXX; Path=/Page

非常感谢。

我有一个启动exe的vb脚本(甚至是没有gui的进程):

strCom = "Start calc"  
WSHShell.Run(strCom)  

它没有启动程序,当我打开任务管理器时我看不到它.
但是当我在命令行中直接编写命令"Start calc"时,它会打开它.

我怎么能用脚本呢？

我如何获得本周的周一日期.星期一是一周的第一天.因此,如果我本周查阅它将返回2012年1月16日的日期

我正在使用VBScript和ASP

提前谢谢了..

保罗