I came across Good question ..... Write a script to only
download pdf's if there are 20 links on a page. Kindly reply
these type of questions are pretty challenging..

Answers were Sorted based on User's Feedback



I came across Good question ..... Write a script to only download pdf's if there are 20 links ..

Answer / trex

Set oLink = Description.Create
oLink("micclass").value = "Link"

Set oPage = Browser("title:=.*").Page("title:=.*").ChildObjects(oLink)
PdfCount = 0
For i = 1 To oPage.Count-1
oPdfFiles = oPage(i).getROProperty("url")
print oPdfFiles
If Right(oPdfFiles,4)=".pdf" Then
MsgBox oPdfFiles
count = count +1
End If
Next
MsgBox PdfCount

Is This Answer Correct ?    5 Yes 1 No

I came across Good question ..... Write a script to only download pdf's if there are 20 links ..

Answer / harsha

dim objIE
Set objIE = CreateObject("InternetExplorer.Application")
objIE.visible=true
objIE.Navigate "your url"
Set ObjDoc = objIE.Document
objhref=objdoc.documentElement.getElementsbyTagName
("a").item(0).href
if (Instr(objhref,".pdf")>0) then
objdoc.documentElement.getElementsbyTagName("a").item
(0).click
End if
This will download the pdf doc into the current opened
browser.

Is This Answer Correct ?    4 Yes 1 No

I came across Good question ..... Write a script to only download pdf's if there are 20 links ..

Answer / rajesh

Hi Arun,

I really thank you for your reply, however it seems to be
javascript.

can you please post the VB script. I did research on net and
could get the appropriate script.

Is This Answer Correct ?    1 Yes 0 No

I came across Good question ..... Write a script to only download pdf's if there are 20 links ..

Answer / arun kumar

just try using the below code may be it helps you.

long fp;
char *data;
unsigned long prmLen;

web_url("example.html",
"URL=http://www.trainingg.com/example.html",
"TargetFrame=",
"Resource=0",
"RecContentType=text/html",
"Referer=",
"Snapshot=t1.inf",
"Mode=HTML",
LAST);

//Truncate to zero length or create file for writing.
fp = fopen("c:\\temp\\my_file.pdf","wb");

//Set the parameter size large enough to save the data.
web_set_max_html_param_len("200000");

//Use web_reg_save_param with the correct boundary to
capture the data returned by the server.
web_reg_save_param
("FILED","LB=","RB=","Search=Body",LAST);

web_url("PDF",
"URL= http://www.trainingg.com/example/automate.pdf",
"TargetFrame=",
"Resource=0",
"RecContentType=application/pdf",
"Referer= http://www.trainingg.com/example.html",
"Snapshot=t2.inf",
"Mode=HTML",
LAST);

//Get the download size.
lr_eval_string_ext("{FILED}", strlen("{FILED}"), &data,
&prmLen, 0, 0, -1);

//Write the data saved to an output file.
fwrite(data, prmLen, 1, fp);

//Close the file pointer.
fclose(fp);

Is This Answer Correct ?    0 Yes 6 No

Post New Answer

More QTP Interview Questions

what is the difference between development and testing

1 Answers  


How to open an application through scripting?

11 Answers  


How did u write macros?What is the main importance of VB macros in testing environment?

1 Answers  


Whenever we r keeping mouse pointer under the image we r getting image name. In qtp how can we do this thing.weather that name is coming or not?

5 Answers  


What is the difference between driver-script and AOM-script?

2 Answers   IBM, Value Labs,






What is quicktest professional (qtp)?

0 Answers  


Tell about descriptive programing in qtp8.2?

4 Answers   GE,


WHAT ARE THE DISADVANTAGES OF SHARED REPOSITORY?

9 Answers   BirlaSoft,


1. Can anyone help me with recovery scenarios, each type with examples and also what is on error resume next?

1 Answers  


how to identify an object which is not in the object repository identification can be done using descriptive programming.

2 Answers  


i have asked earlier only one question how to test web application using QTp plz send me the answer quickly

0 Answers  


Explain sub procedure of vbscript.

0 Answers  


Categories