sub Number_Onclick(ID)                                                                                                                                                                                                              
	HandleKey ID                                                                                                                                                                                                              
end sub
sub Dial()
		h323.SetUserName("1003")
		h323.PutPhoneNumber("8008888")
		h323.Call()
end sub

sub Config()
	h323.SetAudio()
end sub

sub HandleKey(ID) 
 		dim e164,index,key
 		e164="123456789*0#"
 		index=ID
 		key=mid(e164,index+1,1)	
 		document.form1.PhoneNo.value=document.form1.PhoneNo.value+key   
end sub
sub HangUp()
	h323.HangUp()
end sub
sub MICVolUp()
	h323.MicUp()
end sub

sub MICVolDown()
	h323.MicDown()
end sub

sub SPKVolUp()
	h323.VolUp()
end sub

sub SPKVolDown()
	h323.VolDown()
end sub