امروز می خوام در مورد یکی از
ActiveX ها توضیح بدمنام
ActiveX : MSCommunicationوظیفه : ارتباط با مودم
شما می تونید با این
ActiveX با مودم خودتون ارتباط برقرار کنید و بهش مثلاً فرمان بدید که با یه شماره تماس بگیره یه مثال ساده از اینکار رو در اینجا آوردمprivate sub command1_click
dim number
$number=cstr(inputbox("enter the number
"))mscomm1.portopen=true
mscomm1.comport=3
mscomm1.output="ATDT" & number & ";" & vbcr
end sub
private sub command2_click
if mscomm1.portopen=true then mscomm1.portopen=false
end sub
البته من این کد رو خیلی خلاصه و خیلی ساده توضیح دادم شما می تونید مثالی که خود
MSDN Visual Studio6 در مورد این کنترل زده بود رو بصورت کامل دانلود کنیدبا این نرم افزار شما می تونید رمز های یوزرنیم های مختلفی که درسایت ها می گیرید و ممکن بعضی هاشون رو فراموش کنید رو به یاد بیارید.
