<% Sub SendMail(INto, INfrom, Insubject, Inbody) On Error Resume Next Const cdoBasic = 1 'Use basic (clear-text) authentication. Const cdoSendUsingPort = 2 'cdosys related Dim iMsg Dim iConf Dim Flds 'mail related Dim strMsg Dim strTo Dim strCC Dim strFrom Dim strSubject Dim strTextBody '==================begin your configuration============================= 'you must have a username and password or you will not be able to send ' Dim sendusername : sendusername = INsendusername Dim userpassword : userpassword = INuserpassword Dim smtpserver : smtpserver = INsmtpserver 'end your configuration '===================begin set your info here============================ 'set your TO, CC, From, Subject and body here ' strTo = INto strCC = INcc strFrom = INfrom strSubject = Insubject strTextBody = Inbody 'end set your info here 'Create message and configuration objects set iMsg = CreateObject("CDO.Message") set iConf = CreateObject("CDO.Configuration") Set Flds = iConf.Fields 'Apply settings to the configuration object With Flds ' Specify the authentication mechanism to basic (clear-text) authentication. .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic ' The username for authenticating to an SMTP server .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "" ' The password used to authenticate to an SMTP server .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "" ' Port .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort 'Specify mail server .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gdasgroup.com" 'Specify the timeout in seconds .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 ' The port on which the SMTP service specified by the smtpserver field is listening for connections (typically 25) .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 'Use SSL for the connection (False or True) '.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False .Update End With 'Apply the settings to the message object and send it With iMsg Set .Configuration = iConf .To = strTo .From = strFrom If strCC <> "" Then .CC = strCC End If .Subject = strSubject .phplbody = strTextBody 'Send message .Send End With ' cleanup mail objects Set iMsg = Nothing Set iConf = Nothing Set Flds = Nothing If Err.number = 0 Then mesg="There is an error while sending mail Please try again later." Else mesg="Thanks for showing interest. We will revert to you in short span of time." End If %> <% End Sub if Request.QueryString("posted")<>"" then realname=Request.Form("name") email=Request.Form("email") if Request.Form("Capital")="on" then inter="Capital Market" end if if Request.Form("Commodity")="on" then inter1="Commodity Market" end if tel=Request.Form("tel") address=Request.Form("address") city=Request.Form("city") state=Request.Form("state") brief=Request.Form("Comments") Dim msg msg = msg & "" msg = msg &" " msg=msg&"" msg=msg&"" msg = msg & " " msg = msg & "" msg = msg & "" msg = msg & " " msg = msg & "

" msg=msg&"    INDIA'S EMINENT ARBITRAGE BROKER
" msg=msg&"
" msg=msg &" Name: "&realname&"

" msg=msg &" Intersted In: "&inter&" ,"&inter1&"

" msg=msg &" Email: "&email&"

" msg=msg &" Telephone No: "&tel&"

" msg=msg &" Address: "&Address&"

" msg=msg &" City: "&city&"

" msg=msg &" State: "&state&"

" msg=msg &" Requirement: "&brief&"

" msg=msg &" Sincerely,"&"
" msg=msg &realname&"
" msg = msg & "
" Subject="Feedback from "& realname from=email ' Response.Write(msg) ' Response.End() emailto="skadulkar@gmail.com" SendMail emailto, from, Subject, msg end if %> Welcome to G.DAS GROUP - Arbitrage, Share Trading, Commodity Trading, Risk free profit, Capital market, NSC, BSC, MCX, NCDEX

    INDIA'S EMINENT ARBITRAGE BROKER



Home  |  Site map  |  Contact us  |  Disclaimer

  Home   Arbitrage   Capital market   Commodity market   Our offering
 
  About us
  Careers
  Site map
  Partners
  Contact us
  More sites

 


Business associates

One Firm, countless possibilities

G.Das aims partnering with like-minded people who share same ethics, values and a sound client base.
Please submit the following details and we will contact you shortly..

 
Name
Interested in Capital market Commodity market
Tel No.
Email
Address
City
State
Comments
 

 

G.Das reserves the right to screen every applicant to ensure that it falls within the parameters of selection process. Successful applicants will be intimated of their applications in the due course. All business associates appointed will have to follow ethical marketing practices as laid by the organisation, SEBI & other regulatory authority. Failure to implement the same will lead to appropriate action & termination of the partnership. In all disputes G.Das’s decision will be final & binding on the sub-brokers/Agent & within Mumbai’s jurisdiction of law.


 

 

 

 

Copyright 2006@ gdasgroup.com  All rights reserved. Disclaimer
NSE: INB 231126633 | BSE: INB 011045136 | F&O: INF 231126633 |
NCDEX: CO-04-00436 | MCX: 12810