টপিকঃ নন কপিএবল / নন প্রিন্টএবল ওয়েব পেজ পিডিএফ এ প্রিন্ট করুন
কিছুক্ষন আগে শর্তাধীন ভাইয়ের কাছ থেকে সফট টার লিঙ্ক পেলাম। কিন্তু ওটাতে কোন GUI ছিল না । তাই আমি ওটার জন্য একটা GUI এর কোড লিখি । এখন টোটাল প্যাকেজ এর সেটাপ ফাইল করে এখানে দিলাম, কালকে মুল কোম্পানীকে দেব।
কোডঃ Autoit
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$PDFprinter = GUICreate("PDF Printer", 490, 172, 420, 243)
$url = GUICtrlCreateInput("", 8, 32, 473, 25)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$name = GUICtrlCreateInput("", 8, 96, 473, 24)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Create = GUICtrlCreateButton("Create PDF Now !!", 8, 128, 473, 33, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Enter URL to save as pdf (Ex:http://google.com)", 8, 8, 400, 17)
$Label2 = GUICtrlCreateLabel("Enrer File name to save (Ex: doc.pdf)", 8, 72, 175, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $url
Case $name
Case $Create
ProgressOn("Working", "", "0 % done...")
For $i = 5 To 100 Step 10
Sleep(2000)
ProgressSet($i, $i & " % done...")
Next
$pid = RunWait('wkhtmltopdf.exe ' & '"' & GUICtrlRead($url) & '"'& ' ' & '"' & GUICtrlRead($name) & '"',@DesktopDir, @SW_HIDE )
if $pid = 0 then
ProgressSet(100, "Done!")
Sleep(10)
ProgressOff()
MsgBox(0, "Finished", "Page Converted into PDF and saved into desktop")
Endif
EndSwitch
WEndডাউনলোড সাইজ ১৮ মেবা (updating)
এই ব্যাক্তির সকল লেখা কাল্পনিক , জীবিত অথবা মৃত কারো সাথে মিল পাওয়া গেলে তা সম্পুর্ন কাকতালীয়, যদি লেখা জীবিত অথবা মৃত কারো সাথে মিলে যায় তার দায় এই আইডির মালিক কোনক্রমেই বহন করবেন না। এই ব্যক্তির সকল লেখা পাগলের প্রলাপের ন্যায় এই লেখা কোন প্রকার মতপ্রকাশ অথবা রেফারেন্স হিসাবে ব্যবহার করা যাবে না।
-- সত্যি কথা বলতে, আপনি নিজেই এর কথা জানতেন - আমার উল্ল্যেখ করার আগেই 
. হয়তো test করেন নাই এই যা. সব কিছুই test করা বা জানা জরুরী না. 
লেখাটি CC by 3.0 এর অধীনে প্রকাশিত
