Printable View
›››››››››››››››› ›››››››››››››››› ›››››››››››››››› ›››››››››››››››› ›››››››››››››منظورم اينه كه من يه برنامه قرارداد نوشتم كه ميخوام متن قراردادم رو با استفاده از word چاپ كنم .
امكان گزارش گيري با استفاده از Word هست يا نه ؟
علتش اينه كه ميشه مستقيماً تو word تايپ كرد و امكان استفاده از ابزارهاي متني بيشتري داره .
›››››››››››››››› ›››››››››››››››› ›››››››››››››››› ›››››››››››››››› ›››››››››››››
* با دستور Shell ميشه يه فايل Word رو باز كرد.
* البته از تابع API كه اسمش ShellExecute اين كار رو انجام بدي.
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
توضيح تابع ShellExecute در اين پست
مثال: باز كردن فايل Student.DOC
ShellExecuteA hwnd, "open", "File.DOC", vbnullstring, "C:\Student.DOC", SW_NORMAL
* البته يك راه ديگه هم هست كه در اين پست توضيح داده شده.
http://www.barnamenevis.org/im...cons/icon3.gif با اين برنامه ميشه متني كه در VB نوشته شده رو در Word ذخيره كني.
http://www.barnamenevis.org/im...cons/icon4.gif البته يه تغيير خودتون توش اعمال كنيد:
- FilePath رو از نوع String تعريف كنيد:
Dim FilePath As String
- در آخر اين دستور رو بنويسيد:
يعني فايل رو ببنديد.
MWord.Documents(1).Close
مثل اینکه شما کلا نفهمیدین که ایشون چی سوال کرد ایشون میخواد توی یک فایل ورد چیزی بنویسه نه اینکه فایل رو فرا خونی کنه!نقل قول:
نوشته شده توسط obalitjoOon
دوست عزیز برای نوشتن در فایل ورد مثل نوشتن در فایلهای معمولی یک اشاره گر از نوع فایل تعریف کنی و توی اون بنویسی فقط کافیه پسوند اونو doc تعریف کنی تا با ورد باز کنه.
دوستان عزیز توجه فرمائید :
من یه متن قرارداد رو از قبل تو word آماده کردم ولی نام کارفرما و نام پروژه و مبلغ قرارداد رو خالی گذاشتم ؛ حالا من رو فرم سه تا TextBox گذاشتم که یکی مربوط به نام کارفرما و دیگری به نام پروژه و دیگری جهت نوشتن مبلغ قرارداد .
سوال اصلی من اینه که ::: با چه روشی میتونم اطلاعاتی رو که در TextBoxها نوشتم در فایل word و در جای خودشون بذارم و پرینت بگیرم .
سلام
با OLE میتونی این کارو بکنی
شاید office خودش ocx داشته باشه به اونا هم نگا کن واسه excl که داره
میتونی add کنی و باهاش کار کنی
عزیز بلد نیستم میتونی زحمتش و برام بکشی و توضیح بدینقل قول:
نوشته شده توسط reza_optical
یه نمونه ی ساده براتون نوشتم.
برای استفاده از نمونه ابتدا تیک گزینه ی Microsoft Object Libary رو از قسمت Refrences ها بزنید.
Dim objWord As New Word.Application
Private Sub Form_Load()
objWord.Documents.Add
objWord.ActiveDocument.Content.Text = "Mbt925 sample text"
objWord.Visible = True
objWord.Activate
End Sub
دوست من ، من هرچی گشتم Microsoft Object Libary رو پیدا نکرم
نقل قول:
نوشته شده توسط Mbt925
Microsoft Object Libary پيدا نشد ... نيست
دنبال این گزینه باید بگردینقل قول:
نوشته شده توسط y.saied
Microsoft Word 12.0 Object Library
من میخوام متن خودم رو در جای مخصوی در word بذارم .
مثلا نام کارفرما رو در جای خودش و نام پروژه رو در جای خودش و ...
میشه یه نمونه از فایل Word رو که آبجکت های لازم داخلش باشه و یه متن فرضی داشته باشه این جا بذاری !!!نقل قول:
نوشته شده توسط y.saied
سلام
شما اول باید یه فایل template در word بسازی . این فایل پسوند dot. میگیره . در این فایل نوشته های ثابت رو مینویسه و به ازای هر نوشته متغییر هم یک تکست باکس در فایل تمپلیت قرار میدی. با نام مشخص مثلا txtName و غیره . حال در برنامه ت باید این مقادیر رو معرفی کنی و سپس word رو باز کنی.
من دوبار برای دوستان مثال آپلود کردم در پستهای من بگرد اگه پیداش نکردی بگو تا برات مثال بنویسم
سلام
اینهم لینک برنامه پست شماره 3
https://barnamenevis.org/showth...light=template
میشه بگید اون تکست باکس ها رو در فایل My Temp.dot از چه منویی وارد کردید
تو Office 2007 پیداش نمیکنم !!!
نقل قول:
نوشته شده توسط __siavash__
نقل قول:
نوشته شده توسط __siavash__
برای ساختن یک فایل template :
- Word را اجرا نمائید .
- از منوی file گزینه new را انتخاب کنید.
- از پنجره باز شده به General tab رفته پس از انتخاب blank document در قسمت create new ، template را انتخاب کنیدو سپس ok.
- بر یک جای خالی از منوی بالا راست کلیک کنید و گزینه forms را انتخاب کنید.
- شروع به تایپ متن خود کنید و هر کجا متغیری لازم شد از نوار ابزار ایجاد شده text form field را انتخاب کنید و سپس به تایپ ادامه دهید.
- در انتها بر روی متغیرهایی که در متن ایجاد کردید راست کلیک کرده و properties را انتخاب کنید و برای آنها نام مناسب انتخاب کنید مثلا txtName و غیره
- template ایجاد شده را با نام دلخواه ذخیره نمائید. دقت کنید که در این حالت پسوند dot. باید بگیرد.
نقل قول:
نوشته شده توسط Hossein Bazyan
قسمت Template رو پیدا نمیکنم اما توی همون Document همون کاراها رو انجام میدم بعد با پسوند dot. ذخیره میکنم ظاهرا مشکلی نیستنقل قول:
از پنجره باز شده به General tab رفته پس از انتخاب blank document در قسمت create new ، template را انتخاب کنیدو سپس ok.
(البته ToolBox, forms رو توی Office 2007 پیدا نمیکنم )
اما سوال اصلی من اینه که چرا از فرمت dot. استفاده میکنید ؟
اگر یه همچین فایلی رو با پسوند doc. هم ذخیره کنیم میتونیم همون کار رو انجام بدیم !!!
دوست عزيز ، جناب آقاي Hossein Bazyan :
من Sample رو از لينكي كه زحمتش و كشيده بودين دانلو كردم و از تون ممنونم ، ولي وقتي كه روي Command1 كليك ميكنم اين خطا رو ميده اگه زحمتش و بكشي و من و راهنمايي كني ازت يه دنيا ممنون ميشم .
این Error رو که شما فرستادید چی هست ؟نقل قول:
نوشته شده توسط y.saied
یه فایل Error.htm هست !!!؟؟؟ چیزی معلوم نیست
سلام
من خطا رو نتونستم ببینم . با فرمت عکس بفرستش یا تکست .
احتمالا روی کامپیوتر آفیس نصب نیست و یا اینکه کتابخانه word رو به vb فراخوانی نکرده ای .
این برنامه هم در وی بی و هم دات نت کار میکنه.
دوست عزيز ، جناب آقاي Hossein Bazyan :
1 : مشكلم حل فقط اگه ممكنه كدهاي برنامه رو توضيح بدين تا من هم ازش سر دربيارم .
2 : در ضمن اين Sample با Word2007 كار ميكنه يا نه ؟
3 : چون من اولش Word2007 نصب كرده بودم كه خطا ميداد وقتي كه 2003 رو نصب كردم خطا رفع شد.
4 : امكان داره كه اطلاعات رو از بانك اطلاعاتي به Word بديم ، يعني اول تو بانك اطلاعاتي Save بشع بعداٌ بتونيم تو Word ازش استفاده كنيم .
دوستان عزیز این مشکل براحتی قابل حل است
شما میتوانید یک فایل Word را با استفاده از منوی Merge mail مستقیما به بانک اطلاعاتی متصل کنید و فقط هنگام چاپ اون رو فراخوانی کنید .
نقل قول:
نوشته شده توسط kmotavali
میشه بطور کامل توضیح بدی