Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
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


No Answer is Posted For this Question
Be the First to Post Answer

Post New Answer

More VB Script Interview Questions

find the length of the string without using length function?

4 Answers   CSS Corp,


write a vb script to add two 2*2 matrix

2 Answers  


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

4 Answers   NIIT,


What is the event handling in vbscript?

0 Answers  


How to take whole text output from screen of Bitmap Application.

0 Answers   CitiGroup,


What is vbscript procedures?

0 Answers  


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..

6 Answers  


By default in vbscript the arguments passed to functions and subroutines are by reference or by value?

0 Answers  


How will you get the natural logarithm of the given number in vbscript?

0 Answers  


How are arrays declared in the vbscript language?

0 Answers  


how to retrive the tooltip by using descriptive programming in qtp?

3 Answers   iGate,


Mention when to use function procedures and what are its characteristics?

0 Answers  


Categories