Top Adding - Computers and Technology

Some my feel that apart from it being a nifty trick, there isn’t any real practical use for sen

According to USFDA, a combination product is one composed of any combination of a drug and device; biological product and device; drug and biological product

ding E-Mail from a script but lets imagine the following scenario:

You have a business critica

; or drug, device, and biological product and fixed dose combination would include two or more combinations of drug.

Examples of combination products may in

l server called "ImpServ01" that must be available at all costs. The following script can be se

lude drug-coated devices, drugs packaged with delivery devices in medical kits, and drugs and devices packaged separately but intended to be used together.

tup to run every five minutes to check the availability of the server and email you if the serv

here is enormous increase in the number of combination products entering the market in the recent years. Combination products have proven advantages but fixe

r becomes unavailable. This example uses a SMTP server called "SMTP.YourDomain.com" and sends m

d dose combinations are still in the process of convincing regulatory authority on their advantages over the single ingredient formulations.

Combination pro

ail from "ImpServ01@YourDomain.com

ucts have become life saving products for the pharmaceutical companies who doesn’t have many innovative molecules in their product pipeline and have been inc

>" to "Admin@YourDomain.com".

easingly used in the product life cycle management. Even the companies having product patents are trying to extend their product life cycle through the combi

Option Explicit

Dim strComputer Dim colPingStatus Dim objPingStatus Dim objMessage

strComp

nation products and maximize the revenues. But the companies involved in this practice are overlooking that they are burdening the patients both economically

ter = "ImpSrv01"

Set colPingStatus = GetObject("winmgmts:{impersonationLevel=impersonate}").Ex

and physically. They need to rightly judge the benefits of the combination products and they have to even look at the risks involved when combining the produ

ecQuery("SELECT * FROM Win32_PingStatus WHERE address = '" & strComputer & "'")

For Each objPi

ts. Some of the combination products were well accepted by physicians while others suffered. Companies involved in development of combination products are fi

ngStatus In colPingStatus

If IsNull(objPingStatus.StatusCode) or objPingStatus.StatusCode <> 0

ding difficulty in defining their combination products and facing various challenges from selecting a combination to marketing it.

Following aspects would a

Then

Set objMessage = CreateObject("CDO.Message")

objMessage.From = strComputer & "@YourDoma

dd to the challenges in developing combination products:

Which markets to tap where the combination products can do fairly well?
Which combination prod

n.com"

objMessage.To = "Admin@YourDomain.com"

objMessage.Subject = strComputer & " is unavail

cts are meaningful and rational?
Which therapeutic categories to select?
Which Combinations can address unmet needs of the patients?
Do combin

able"

objMessage.Textbody = strComputer & " is no longer accessible over the network."

objMes

tions increase the patient compliance?
What would be the developing cost?
How to tackle the risks encountered during combination product developmen

sage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

t?

As combination products don't fit into the traditional categories of drugs, medical devices, or biological products, the USFDA is in the process of devel

objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserve

ping new procedures for reviewing their safety, efficacy and quality.

Professional from academic institutions, pharmaceutical industries, health care indust

") = "SMTP.YourDomain.com"

objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/

y and representatives from various regulatory agencies are working out to design the regulatory requirements for manufacture and sale of combination products

cdo/configuration/smtpserverport") = 25

objMessage.Configuration.Fields.Update

objMessage.Sen

.

As there is an increasing trend of the combination products companies manufacturing such products should be able to tackle the problems involved in the de

d

End If Next

Set colPingStatus = Nothing Set objMessage = Nothing

To attach a file

elopment. They need to be wiser in analyzing the market trends and the regulatory requirements.

Companies that provide selfless information through particip

to the E-Mail add the following line:

objMessage.AddAttachment "SomeDocument.doc"

tion in industry events and feedback to regulatory authorities would be able to face the challenges and will be successful in developing combination products

Tags

Links

Top Adding - VBScript - Send E-Mail with CDO.Message

Related Articles: