کامپوننت برای ارسال Fax

[MShirzadi]

کسی کامپوننتی برای ارسالFax میشناسه اگر کسی لینکی داره لطف کنه برامون بزاره

باتشکر از همه دوستان

[DonetKarvb]

من یکی میشناسم که عموما" هم از این استفاده میکنند. ولی زیاد ازش خوشم نیومده
Kdtele

[sh]

از سرویس فکس ویندوز استفاده کن هزاران مثال هم توی اینترنت برای اون وجود داره

[MShirzadi]

من یکی میشناسم که عموما" هم از این استفاده میکنند. ولی زیاد ازش خوشم نیومده
Kdtele

دوست عزیز از کجا گیرش بیارم
البته بدون Licence

[DonetKarvb]

دوست عزیز از کجا گیرش بیارم
البته بدون Licence

از سایت خود شرکت:
http://www.kaed.com/kdtele/download.html
اگر منظورت از لایسنس کار غیر اخلاقیشه ( ک. ر . ک) پیام خصوصی بفرست

[sh]

توی لینک امضاء من هست

[MShirzadi]

از سایت خود شرکت:
http://www.kaed.com/kdtele/download.html
اگر منظورت از لایسنس کار غیر اخلاقیشه ( ک. ر . ک) پیام خصوصی بفرست

ولی این سایت رو باز نمی کنه

[DonetKarvb]

ولی این سایت رو باز نمی کنه

آره برای منم باز نمیکنه.
با پام خصوصی ایمیلت رو بفرست تا برات میلش کنم. ( همراه با اون چیزی که تو امضای دوستمون هست)

[vahidiran]

اگه لینکی هستش اینجا بگید که همه استفاده کنند

[DonetKarvb]

اگه لینکی هستش اینجا بگید که همه استفاده کنند

خلاف قوانین سایت است. میشه فروختش (در ملا عام) ولی نمیشه لینک گذاشت لینک رو باید تو پیام خصوی داد و یا خود فایل رو میلش کرد

[mnoruzi]

پس اگه میشه یه کپی اش رو برا من هم سند که چون در به در دنبال یه همچین چیزی هستم!!!!!

[saeed_rezaei]

Try

Dim fo AsNew OpenFileDialog

fo.Filter = "Microsoft Word Document (*.doc)|*.doc| Adobe PDF (*.pdf)|*.pdf"

If fo.ShowDialog = DialogResult.OK Then

If fo.FileName = "" Then

ExitSub

EndIf

Else

ExitSub

EndIf

Dim fxsvr = New FAXCOMLib.FaxServer

Dim fxdoc = fxsvr.CreateDocument(fo.FileName)

Try

fxsvr.Connect("Machine Name ") 

Catch ex As Exception

MessageBox.Show(ex.ToString())

EndTry

fxdoc.FileName = fo.FileName

fxdoc.FaxNumber = InputBox("Fax Number:", "Enter Fax Number", -1, -1)

fxdoc.RecipientName = ""

Try

fxdoc.Send()

Catch ex As Exception

MessageBox.Show(ex.ToString())

EndTry

fxsvr.Disconnect()

Catch ex As Exception

MessageBox.Show(ex.message() & ControlChars.CrLf & ControlChars.CrLf & ex.ToString(), "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

EndTry

[MehdiElexal]

حالا این همه لینک این یکی شد غیر اخلاقی

[mansourii]

اگه کسی این کامپوننت رو می خواد برید توی این سایت ( این سایت برای یکی از دوستان برنامه نویسه)
توی این سایت دانلود KDTele3.6 همراه با مثال وی بی دات نت / وی بی 6 / دلفی است
در ضمن همونجا ک ر ک هم داره!