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
Difference between Do while loop and while wend loop
Explain the adodb.stream class?
What aspects of vbscript make it safe so that a web page using vbscript cannot destroy or corrupt information on a user's computer?
* ** *** Please write a code to get output like above diagram? ple explain as it how the code works?
what is visual basic?
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?
write a vb script to display the size of the folder,date created and name of the folder
write a vb script to rename a folder from tree4 to tree7
Can anyone send me a vb script function for verifying the functionality of active links on a web page
Inorder to avoid Message box while writing script which alternative method can be used?
What is the event handling in vbscript?
Which function is used in the vbscript language to convert the specified expression into a date type value?