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

Post New Answer

More VB Script Interview Questions

How to write a general script which should does the following a). If a page object is given, it should identify the page object of the corresponding page(site). b). It should identify all the links of that particular page. in QTP tool?

2 Answers   IBM, Infosys, Wipro,


When to use function procedures and what are its characteristics?

0 Answers  


How to open browser in vb script?

0 Answers  


Both Static and dynamic arrays are handled by VB script. Is it true?

0 Answers  


Hi all..I have two values. a=20 ,b=30 I want to perform c= a+b and c= a*b using user define function.please anyone give the answer

1 Answers  


if there is any string in a given format like as "company name employeecode date" then we have to fetch employeecode form string for ex-string is "capgemini12345june2013" then we have to fetch 12345 by using vb script so guys how can we do that please reply it.

3 Answers   Cap Gemini,


How many types of operators are available in the vbscript language?

0 Answers  


Find Out Length of an array without using Ubound?

1 Answers  


Which operator is used to perform the comparison among 2 operands in the vbscript language?

0 Answers  


Suppose by navigation I went from 1 st page to 5 page ,so Write a generic script for coming from any page to the 1st page and by executing where the page may be it will come to 1st page

1 Answers   CybAge,


Capture the Unique label changes on google home page for I am feeling lucky button and save those label changes to Notepad Note: Using QTP

0 Answers   Quest,


how to write basic programs in VB Script like addition, multiplication?

14 Answers  


Categories