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
- 2735 Views
- I also Faced
- E-Mail Answers
No Answer is Posted For this Question
Be the First to Post Answer
Explain about the support of asp for vb script functionality?
does anyone have qtp11.0 license key.Please sendit to my mail id-rrvv2011@gmail.com...Thanks
How to return a value from function...? you should not tell msgbox, print.. etc.,
Which function allows you to instantiate an object given its programmatic identifier or progid?
how to retrieve native property value in runtime?
a;;b;c;;;d in this string output is abcd will come how can we do that in vbscript in QTP testing?
What is purpose of scripting.filesystemobject class in vbscript?
How will you convert a given number to long in vbscript?
Whenever I use Wscript.Echo Qtp raising Run time error as 'Object required for Wscript' How I can create object for Wscript
Check whether given Number is Even or Odd?
Mention what is variant in vbscript?
Which operator is used to perform the comparison among 2 operands in the vbscript language?
ASP 
