Interested to Buy Any Domain ? << Click Here >> for more details...
Sub link()
Dim k As Integer
Dim rand As Integer
Dim URL As String
Dim foldernum As Integer
Dim folderstring As String
Dim filenum As Integer
Dim filestring As String
k = 1
'for AC Numbers
For i = 11 To 40
foldernum = 0
foldernum = 1000 + i
folderstring = CStr(foldernum)
folderstring = Mid(folderstring, 2, 3)
folder = "ac" & folderstring
'folderstring = Sheets(2).Cells(i, 1)
' for Number of Random files
For j = 1 To 10
rand = Int(Rnd * (200 - 1) + 1)
filenum = 0
filenum = 1000 + rand
filestring = CStr(filenum)
filestring = Mid(filestring, 2, 3)
'URL = "http://ceobihar.nic.in/PSCDROM/ac" & folderstring &
"/i" & folderstring & "0" & filestring & ".pdf"
URL = "http://www.elections.tn.gov.in/pdfs/dt1/" & folder &
"/" & folder & filestring & ".pdf"
' URL
=http://www.wb.nic.in/wbeco/EROLLS/PDF/English/A001/a0010105
.pdf
Cells(k, 1) = folderstring
Cells(k, 2) = folder
Cells(k, 3) = filestring
Cells(k, 3) = URL
k = k + 1
Next j
Next i
End Sub
plz define it
- 0 Answers
- 2777 Views
- I also Faced
- E-Mail Answers
No Answer is Posted For this Question
Be the First to Post Answer
write script to open Gmail.com, and to write script for entering username and password and show whether the result as pass or fail
How to Import data from a file (file is on the desktop) to the data table
Hello All, In QTP 9.2 for Mozilla Firefox, there is webelement in my application, I tried to click on that using decsriptive programming, but it does not work. and for this i tried this code too: Set obj = CreateObject ("Mercury.DeviceReplay") absx = Browser("").Page("").WebElement(".").GetROProperty ("abs_x") absy = Browser("").Page("").WebElement(".").GetROProperty ("abs_y") obj.MouseMove absx, absy obj.MouseClick absx, absy, 0 But it is not clicked. Can anyone help me out for this problem. Thnx in Advance
we executed QTP scripts in one browser(i.e IN)same scripts is working on another browsers or not (i.e mean netscap,m azol..like )
how to write code: to check whether the window of an Application Under Test exist or not . plz give with example
Which in-built function is used to format the number in the vbscript language?
pls tell me which is good book or site for vbscript?
regular expression that will recognize a browser as long as its name property starts with mybrowser
Hi I am having one folder with set of text files now i want to read and write that text files data into QTP. Any help plsss.
Which function is used to perform string comparison?
write a vb script to display the number is odd or even and whether it is divisible by 9 or not
How to select a value from a list box by using Selenium web-driver?
ASP 
