vbscript

How to connect to oracle database using VBScript and UFT?

由 為{幸葍}努か 提交于 2020-04-14 07:35:12
问题 It seems the question on how to connect to oracle database from UFT/VBscript is asked on multiple forums. In most places, there are answers in bits and pieces, without any one detailed answer that helps user get this information. I spent close to 6 days to get this working and thus I feel its worth to share all the detailed steps here. The main reason I found this for going wrong is a wrong combination of one or more of below: Using the wrong driver. Using the wrong connection string. Using

VBScript formatting dd/mm/yyyy the values contained in cell Excel file [duplicate]

由 ≡放荡痞女 提交于 2020-04-07 02:28:25
问题 This question already has an answer here : Format current date and time in VBScript (1 answer) Closed 11 days ago . I use this code for import in XLSX Excel file the TXT text file : Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False objExcel.DisplayAlerts = False objExcel.Workbooks.OpenText strTXTfile, , , xlDelimited, , , , , , , True, ";" Set wb = objExcel.ActiveWorkbook objExcel.Sheets(1).Columns("H:H").NumberFormat = "dd/mm/yyyy" wb.SaveAs strXLSfile,

VBScript formatting dd/mm/yyyy the values contained in cell Excel file [duplicate]

由 时光毁灭记忆、已成空白 提交于 2020-04-07 02:26:19
问题 This question already has an answer here : Format current date and time in VBScript (1 answer) Closed 11 days ago . I use this code for import in XLSX Excel file the TXT text file : Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False objExcel.DisplayAlerts = False objExcel.Workbooks.OpenText strTXTfile, , , xlDelimited, , , , , , , True, ";" Set wb = objExcel.ActiveWorkbook objExcel.Sheets(1).Columns("H:H").NumberFormat = "dd/mm/yyyy" wb.SaveAs strXLSfile,

How to perform case insensitive search in XPath?

由 前提是你 提交于 2020-04-07 02:24:56
问题 I am trying to implement case insensitive search using XPath. I have already referred how to perform a case-insensitive attribute selector in xquery so please check before marking as duplicate. I am using Lcase to convert my variable ( L_search ) to lowercase and lower-case functions. My original case sensitive XPath expression is: XPath = "//*[contains(., '"& search &"')]/ancestor-or-self::*/*[local-name()='home' and @locale='en']" I have tried many combinations like : XPath = "//*lower-case

How to perform case insensitive search in XPath?

由 寵の児 提交于 2020-04-07 02:23:09
问题 I am trying to implement case insensitive search using XPath. I have already referred how to perform a case-insensitive attribute selector in xquery so please check before marking as duplicate. I am using Lcase to convert my variable ( L_search ) to lowercase and lower-case functions. My original case sensitive XPath expression is: XPath = "//*[contains(., '"& search &"')]/ancestor-or-self::*/*[local-name()='home' and @locale='en']" I have tried many combinations like : XPath = "//*lower-case

VBScript to copy 720p 60fps MP4 files

由 拈花ヽ惹草 提交于 2020-04-06 22:32:47
问题 I'm trying to write a script that will copy mp4 files to specific folders based on their frame height or frame rate. This is the code I have now that works but this just copies all MP4 files in a folder and subfolders to a destination folder. How do I take it a step further and separate the files based on the frame height (720 for 720p files and 1080 for 1080i files)? Option Explicit Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject") Dim objSTR, objMP4dest, objXCHANGEdest,

VBScript to copy 720p 60fps MP4 files

由 主宰稳场 提交于 2020-04-06 22:28:24
问题 I'm trying to write a script that will copy mp4 files to specific folders based on their frame height or frame rate. This is the code I have now that works but this just copies all MP4 files in a folder and subfolders to a destination folder. How do I take it a step further and separate the files based on the frame height (720 for 720p files and 1080 for 1080i files)? Option Explicit Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject") Dim objSTR, objMP4dest, objXCHANGEdest,

How to execute multiple Oracle sql queries from VBscript?

由 人盡茶涼 提交于 2020-03-27 08:12:14
问题 I have a database object called objdb. From this object it seems that I can only execute one sql query at a time. if I insert a semi-colon in the end,it gives me a ORA-0911 invalid character error. For example, if I run objdb.executeSQl("select * from table1; select * from table2") This gives me a error. How can I run multiple queries from a single ExecuteSQl method ? 来源： https://stackoverflow.com/questions/40798206/how-to-execute-multiple-oracle-sql-queries-from-vbscript

Find substring from string output

由 左心房为你撑大大i 提交于 2020-03-25 03:39:27
问题 I have a script (below) that finds the current version of Microsoft Office Installed and outputs it as a string. The string output for example would be 15.0.4771.1000. I don't care about anything past the 15. My goal is to verify that the version of Office is 15. I want to take the substring of the digts before the 1st . (period) and compare it to the value in questioned. How would I do this? The script below doesn't work even with a wild card for the compared value. Dim oRegistry Dim oFSO

日历控件

由 前提是你 提交于 2020-03-24 06:03:20
calendar.htm: < html > < head > < meta http-equiv ="Content-Type" content ="text/html; charset=gb2312" > < title ></ title > < link rel ="stylesheet" type ="text/css" href ="../setstyle.css" > </ head > < body topmargin =0 leftmargin =0 bgcolor =#3974AE > < center > < table border ="1" width ="245" cellspacing ="0" cellpadding ="0" bordercolor ="#ABC7E2" bordercolordark ="#FFFFFF" bordercolorlight ="#808080" height ="160" > < tr > < th width ="100%" align ="center" > < table border ="0" cellspacing ="0" cellpadding ="0" > < tr > < th valign ="middle" width ="10%" >< img border ="0" src ="..
订阅 vbscript