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
No Answer is Posted For this Question
Be the First to Post Answer
find the length of the string without using length function?
write a vb script to add two 2*2 matrix
How will you generate Reports using Vb Script?it asked in testing(QTP)Interview.Plz Any Body Let me know. Thanks uday Uday_testing@yahoo.co.in
What is the event handling in vbscript?
How to take whole text output from screen of Bitmap Application.
What is vbscript procedures?
hai all.iam chandu..please let me know how to test a link in QTP when it is changing at run time..and what property we should take while we r using descriptive programming for a link..
By default in vbscript the arguments passed to functions and subroutines are by reference or by value?
How will you get the natural logarithm of the given number in vbscript?
How are arrays declared in the vbscript language?
how to retrive the tooltip by using descriptive programming in qtp?
Mention when to use function procedures and what are its characteristics?