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

Difference between Do while loop and while wend loop

1 Answers  


Explain the adodb.stream class?

0 Answers  


What aspects of vbscript make it safe so that a web page using vbscript cannot destroy or corrupt information on a user's computer?

0 Answers  


* ** *** Please write a code to get output like above diagram? ple explain as it how the code works?

2 Answers  


what is visual basic?

2 Answers   Seion Infotech,


How can we return a value from User Defined Function ? For Eg. we have 2 functions. In Fun1 i am getting 2 values (a,b) and i am addding those 2 and storing in to another var (c). Now i want to pass that var(c) to another function (fun2). What will be the script?

6 Answers   Nous,


write a vb script to display the size of the folder,date created and name of the folder

1 Answers  


write a vb script to rename a folder from tree4 to tree7

3 Answers  


Can anyone send me a vb script function for verifying the functionality of active links on a web page

0 Answers   Zensar,


Inorder to avoid Message box while writing script which alternative method can be used?

1 Answers  


What is the event handling in vbscript?

0 Answers  


Which function is used in the vbscript language to convert the specified expression into a date type value?

0 Answers  


Categories