2015 | cara budidaya

Home > Archives for 2015

Generated Policy

<p><h1 style="background-color: white; color: #454545; font-family: Arial, sans-serif; font-size: 2.2em; font-stretch: normal; letter-spacing: -1px; margin: 0px; padding: 8px 0px 0px;">
Privacy Policy for CARA BUDIDAYA</h1>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
If you require any more information or have any questions about our privacy policy, please feel free to contact us by email at <a href="mailto:inggilsasongko@gmail.com" style="background: inherit; color: #2f637a;">inggilsasongko@gmail.com</a>.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
At http://carabudidaya-sidat.blogspot.com/ we consider the privacy of our visitors to be extremely important. This privacy policy document describes in detail the types of personal information is collected and recorded by http://carabudidaya-sidat.blogspot.com/ and how we use it.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<b>Log Files</b><br />Like many other Web sites, http://carabudidaya-sidat.blogspot.com/ makes use of log files. These files merely logs visitors to the site - usually a standard procedure for hosting companies and a part of hosting services's analytics. The information inside the log files includes internet protocol (IP) addresses, browser type, Internet Service Provider (ISP), date/time stamp, referring/exit pages, and possibly the number of clicks. This information is used to analyze trends, administer the site, track user's movement around the site, and gather demographic information. IP addresses, and other such information are not linked to any information that is personally identifiable.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<b>Cookies and Web Beacons</b><br />http://carabudidaya-sidat.blogspot.com/ uses cookies to store information about visitors' preferences, to record user-specific information on which pages the site visitor accesses or visits, and to personalize or customize our web page content based upon visitors' browser type or other information that the visitor sends via their browser.</div>
<b style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px;">DoubleClick DART Cookie</b><br />
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
→ Google, as a third party vendor, uses cookies to serve ads on http://carabudidaya-sidat.blogspot.com/.<br />→ Google's use of the DART cookie enables it to serve ads to our site's visitors based upon their visit to http://carabudidaya-sidat.blogspot.com/ and other sites on the Internet.<br />→ Users may opt out of the use of the DART cookie by visiting the Google ad and content network privacy policy at the following URL - <a href="http://www.google.com/privacy_ads.html" style="background: inherit; color: #2f637a;" title="Opt out of the Dart Cookie">http://www.google.com/privacy_ads.html</a></div>
<b style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px;">Our Advertising Partners</b><br />
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
Some of our advertising partners may use cookies and web beacons on our site. Our advertising partners include ....... </div>
<ul style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin: 0px 0px 0px 5px; padding: 0px 0px 0px 20px;">
<li>Google</li>
</ul>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<em>While each of these advertising partners has their own Privacy Policy for their site, an updated and hyperlinked resource is maintained here: <a href="http://www.privacypolicyonline.com/privacy-policies" style="background: inherit; color: #2f637a;">Privacy Policies</a>.<br />You may consult this listing to find the privacy policy for each of the advertising partners of http://carabudidaya-sidat.blogspot.com/.</em></div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
These third-party ad servers or ad networks use technology in their respective advertisements and links that appear on http://carabudidaya-sidat.blogspot.com/ and which are sent directly to your browser. They automatically receive your IP address when this occurs. Other technologies (such as cookies, JavaScript, or Web Beacons) may also be used by our site's third-party ad networks to measure the effectiveness of their advertising campaigns and/or to personalize the advertising content that you see on the site.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
http://carabudidaya-sidat.blogspot.com/ has no access to or control over these cookies that are used by third-party advertisers.</div>
<b style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px;">Third Party Privacy Policies</b><br />
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
You should consult the respective privacy policies of these third-party ad servers for more detailed information on their practices as well as for instructions about how to opt-out of certain practices. http://carabudidaya-sidat.blogspot.com/'s privacy policy does not apply to, and we cannot control the activities of, such other advertisers or web sites. You may find a comprehensive listing of these privacy policies and their links here: <a href="http://www.privacypolicyonline.com/privacy-policy-links" style="background: inherit; color: #2f637a;" title="Privacy Policy Links">Privacy Policy Links</a>.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
If you wish to disable cookies, you may do so through your individual browser options. More detailed information about cookie management with specific web browsers can be found at the browsers' respective websites. <a href="http://www.privacypolicyonline.com/what-are-cookies" style="background: inherit; color: #2f637a;">What Are Cookies?</a></div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<strong>Children's Information</strong><br />We believe it is important to provide added protection for children online. We encourage parents and guardians to spend time online with their children to observe, participate in and/or monitor and guide their online activity. http://carabudidaya-sidat.blogspot.com/ does not knowingly collect any personally identifiable information from children under the age of 13. If a parent or guardian believes that http://carabudidaya-sidat.blogspot.com/ has in its database the personally-identifiable information of a child under the age of 13, please contact us immediately (using the contact in the first paragraph) and we will use our best efforts to promptly remove such information from our records.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<b>Online Privacy Policy Only</b><br />This privacy policy applies only to our online activities and is valid for visitors to our website and regarding information shared and/or collected there. This policy does not apply to any information collected offline or via channels other than this website.</div>
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<b>Consent</b><br />By using our website, you hereby consent to our privacy policy and agree to its terms.</div>
<a href="http://www.privacypolicyonline.com/" style="background-attachment: inherit; background-clip: inherit; background-color: white; background-image: inherit; background-origin: inherit; background-position: inherit; background-repeat: inherit; background-size: inherit; color: #2f637a; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px;" target="_blank" title="PrivacyPolicyOnline.com Approved Site"><img align="right" alt="Privacy Policy Online Approved Site" border="0" src="http://www.privacypolicyonline.com/images/privacypolicyonline-seal.png" style="border: 0px;" /></a><br />
<div style="background-color: white; color: #454545; font-family: Tahoma, Arial, sans-serif; font-size: 12.8000001907349px; line-height: 21.7600002288818px; margin-bottom: 5px;">
<b>Update</b><br />This Privacy Policy was last updated on: Sunday, July 5th, 2015.<br /><em>Should we update, amend or make any changes to our privacy policy, those changes will be posted here.</em></div>
</p>

Privacy Policy for CARA BUDIDAYA If you require any more information or have any questions about our privacy policy, please feel free to ...

Samsung Galaxy Tab 8.9 P 7300 Harga Spesifikasi Terbaru 2015

<p><div style="text-align: justify;">
<b>Samsung Galaxy Tab 8.9 P 7300 Harga Spesifikasi Terbaru 2015</b> - Bagi pembaca yang sedang mencari informasi mengenai <span style="background-color: white; color: #222222; font-family: arial, helvetica, sans-serif; font-size: 13px; white-space: nowrap;"><b><i>samsung galaxy tab 8.9</i></b></span>, berikut admin persembahkan buat kamu. Semoga dengan tulisan ini dapat memberikan informasi yang cukup untuk pembaca semua. Berikut admin persembahkan <u>Harga Spesifikasi Samsung Galaxy Tab 8.9</u> buat pembaca sekalian.</div>
<div style="text-align: justify;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEixKiQ5Ccr3KAUtgMXiLxLxAxIDxCMtOSnJSp0puDDN5XRdPbmETZo9WgMr9drmo1waIZscQC_-CwSUEUcefvVnXGU4svmNIqnyU7KdZFH6EkymPPomhgKNUi5yr4QmBqI-Fr7WwVJNPFBl/s1600/samsung+galaxy+tab+8.9.jpg" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="samsung galaxy tab 8.9" border="0" height="213" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEixKiQ5Ccr3KAUtgMXiLxLxAxIDxCMtOSnJSp0puDDN5XRdPbmETZo9WgMr9drmo1waIZscQC_-CwSUEUcefvVnXGU4svmNIqnyU7KdZFH6EkymPPomhgKNUi5yr4QmBqI-Fr7WwVJNPFBl/s320/samsung+galaxy+tab+8.9.jpg" title="samsung galaxy tab 8.9" width="320" /></a></div>
<div style="text-align: justify;">
<br /></div>
<h3 style="text-align: justify;">
<span style="color: blue;">Samsung Galaxy Tab 8.9 Spesifikasi</span></h3>
<div>
<div class="jrFieldGroup harga">
<h3 class="jrFieldGroupTitle">
</h3>
<div class="jrFieldRow jrHargasecond">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<br /></div>
</div>
</div>
</div>
<div class="jrFieldGroup tahun">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Tahun</h3>
<div class="jrFieldRow jrTahun">
<div class="jrFieldLabel">
<div style="text-align: justify;">
2011</div>
</div>
</div>
</div>
<div class="jrFieldGroup general">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
General</h3>
<div class="jrFieldRow jrNetwork">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Network</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
2G GSM 850 / 900 / 1800 / 1900, 3G HSDPA 850 / 900 / 1900 / 2100 HSDPA 900 / 2100</div>
</div>
</div>
</div>
<div class="jrFieldGroup layar">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Layar</h3>
<div class="jrFieldRow jrTipe">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Tipe</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
PLS TFT Capacitive Touch Screen, 16M Colors</div>
</div>
</div>
<div class="jrFieldRow jrUkuran">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Ukuran</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
800  x 1280 pixels, 8.9 inches (~170 ppi pixel density), Multi-touch input  method, Accelerometer Sensor for UI Auto-rotate, Samsung TouchWiz UX,  Three-axis gyro sensor, Touch-sensitive controls</div>
</div>
</div>
</div>
<div class="jrFieldGroup dimensi">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Dimensi</h3>
<div class="jrFieldRow jrUkuranberat">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Ukuran/Berat</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
230.9 x 157.8 x 8.6 mm / 455 g</div>
</div>
</div>
</div>
<div class="jrFieldGroup audio">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Audio</h3>
<div class="jrFieldRow jrFitur">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Fitur</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
MP3 Ringtones</div>
</div>
</div>
<div class="jrFieldRow jrJack">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Jack</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
3,5 mm Jack Audio</div>
</div>
</div>
</div>
<div class="jrFieldGroup memory">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Memory</h3>
<div class="jrFieldRow jrInternal">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Internal</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
16 GB storage, 1GB RAM</div>
</div>
</div>
</div>
<div class="jrFieldGroup data">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Data</h3>
<div class="jrFieldRow jr3g">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">3G</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
HSDPA 42 Mbps, HSUPA</div>
</div>
</div>
<div class="jrFieldRow jrEdge">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">EDGE</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Ya</div>
</div>
</div>
<div class="jrFieldRow jrGprs">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">GPRS</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Ya</div>
</div>
</div>
<div class="jrFieldRow jrWlan">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">WLAN</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Wi-Fi 802.11 a / b / g / n, Wi-Fi Hotspot</div>
</div>
</div>
<div class="jrFieldRow jrUsbport">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">USB/Port</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
v2.0</div>
</div>
</div>
</div>
<div class="jrFieldGroup kamera">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Kamera</h3>
<div class="jrFieldRow jrPrimer">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Primer</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
3.15 MP, 2048x1536 pixels, Autofocus, LED Flash</div>
</div>
</div>
<div class="jrFieldRow jrSekunder">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Sekunder</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
2 MP</div>
</div>
</div>
<div class="jrFieldRow jrVideorecord">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Video Record</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
720p</div>
</div>
</div>
</div>
<div class="jrFieldGroup baterai">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Baterai</h3>
<div class="jrFieldRow jrTipebaterai">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Tipe</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Standard Battery, Li-Ion 6100 mAh</div>
</div>
</div>
</div>
<div class="jrFieldGroup fitur">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Fitur</h3>
<div class="jrFieldRow jrOs">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">OS</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Android OS, v3.2 (Honeycomb)</div>
</div>
</div>
<div class="jrFieldRow jrCpu">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">CPU</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Dual-core 1 GHz Cortex-A9</div>
</div>
</div>
<div class="jrFieldRow jrBrowser">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Browser</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
HTML</div>
</div>
</div>
<div class="jrFieldRow jrGps">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">GPS</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
With A-GPS support</div>
</div>
</div>
<div class="jrFieldRow jrMessaging">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Messaging</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
SMS (threaded view), MMS, Email, Push Email, IM</div>
</div>
</div>
<div class="jrFieldRow jrJava">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Fitur Tambahan</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Java  MIDP emulator, SNS integration, Digital Compass - TV-out, Organizer,  Image / Video editor, Quickoffice HD Editor / Viewer, Google Search,  Maps, Gmail, YouTube, Calendar, Google Talk, Picasa Integration, Adobe  Flash 10.2 Support, Voice</div>
</div>
</div>
</div>
<div class="jrFieldGroup fitur-lain">
<h3 class="jrFieldGroupTitle" style="text-align: justify;">
Fitur Lain</h3>
<div class="jrFieldRow jrVideoplayer">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Video Player</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
MP4 / DivX / Xvid / H.264 / H.263 Player</div>
</div>
</div>
<div class="jrFieldRow jrMp3player">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">MP3 Player</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
MP3 / WAV / eAAC+ / OGG Player</div>
</div>
</div>
<div class="jrFieldRow jrAudiorecord">
<div class="jrFieldLabel">
<div style="text-align: justify;">
<span style="color: blue;">Audio Record</span></div>
</div>
<div class="jrFieldValue ">
<div style="text-align: justify;">
Ya</div>
</div>
</div>
</div>
</div>
<div style="text-align: justify;">
<br /></div>
<h3 style="text-align: justify;">
<span style="color: blue;">Harga Samsung Galaxy Tab 8.9 Juni 2015</span></h3>
<div style="text-align: justify;">
<br /></div>
<div style="text-align: justify;">
<i><span style="color: red;">Harga baru : Rp. -</span></i></div>
<div style="text-align: justify;">
<i><span style="color: red;">Harga bekas/second : Rp. 1.950.000</span></i></div>
<div style="text-align: justify;">
<br /></div>
<div style="text-align: justify;">
<b><u>Harga Samsung Galaxy Tab 8.9 P 7300 Dan Spesifikasi Terbaru</u></b> telah admin berikan. Dan bisa saja harga diatas tidak sesuai dengan tempat tinggal pembaca, karena memang harga <u><i>Samsung Galaxy Tab 8</i></u> setiap kota berbeda. Baca juga artikel kami sebelumnya Harga Samsung Galaxy Tab 3 7.0 T2110 Dan Spesifikasi Terbaru.</div>
</p>

Samsung Galaxy Tab 8.9 P 7300 Harga Spesifikasi Terbaru 2015 - Bagi pembaca yang sedang mencari informasi mengenai samsung galaxy tab 8.9...

Harga Samsung Galaxy Tab 3 7.0 T2110 Dan Spesifikasi Terbaru 2015

<p><div style="text-align: justify;"><b><u><a href="http://farrayroom.blogspot.com/2015/06/harga-samsung-galaxy-tab-3-dan.html" target="_blank">Harga Samsung Galaxy Tab 3 Dan Spesifikasi Terbaru 2015</a></u></b> - Smartphone yang satu ini pastinya sudah tidak asing lagi bagi kita. <b>Samsung Galaxy Tab 3</b> merupakan Smartphone canggih masa kini yang banyak sekali peminatnya, terutama bagi mereka pecinta gadget. Baca info <i><u>Samsung Galaxy Tab 3 harga dan spesifikasi</u></i> dibawah ini sebagai rujukan bagi kawan pembaca sebelum membelinya.</div><div style="text-align: justify;"><br /></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjNTWFGuMzNMe3_kTetLGAmNDZVZ87St_X6d3AIXU05j5s-oE0cr4twMVc6t6gDlGyGUkJLRFQaYuEffxm4F-mtV1lRAuxong8YHJSxbBrvzNUc_CiqX5wXxf3L2XkRrU5ISLDu-hLiPJfu/s1600/Harga+Samsung+Galaxy+Tab+3.jpg" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Harga Samsung Galaxy Tab 3" border="0" height="203" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjNTWFGuMzNMe3_kTetLGAmNDZVZ87St_X6d3AIXU05j5s-oE0cr4twMVc6t6gDlGyGUkJLRFQaYuEffxm4F-mtV1lRAuxong8YHJSxbBrvzNUc_CiqX5wXxf3L2XkRrU5ISLDu-hLiPJfu/s320/Harga+Samsung+Galaxy+Tab+3.jpg" title="Harga Samsung Galaxy Tab 3" width="320" /></a></div><div style="text-align: justify;"><br /></div><h3 style="text-align: justify;"><span style="color: blue;">Samsung Galaxy Tab 3 Spesifikasi</span></h3><div style="text-align: justify;"><i>Jaringan: GSM 850/900/1800/1900, 3G, HSDPA 850/1900/2100</i></div><div style="text-align: justify;"><i>SIM: Single GSM, bisa untuk telepon dan SMS</i></div><div style="text-align: justify;"><i>Layar: TFT capacitive touchscreen, 16M colors</i></div><div style="text-align: justify;"><i>Ukuran: 7.0 inci, resolusi 600 x 1024 piksel (~170 ppi pixel density)</i></div><div style="text-align: justify;"><i>CPU: Dualcore</i></div><div style="text-align: justify;"><i>1.2 GHz</i></div><div style="text-align: justify;"><i>OS: Android 4.1.2 (Jelly Bean)</i></div><div style="text-align: justify;"><i>Memori RAM: 1GB</i></div><div style="text-align: justify;"><i>Kapasitas penyimpanan: 8GB/16GB</i></div><div style="text-align: justify;"><i>Kartu memori: microSD up to 64GB</i></div><div style="text-align: justify;"><i>Kamera utama: 3.15MP</i></div><div style="text-align: justify;"><i>Kamera depan: 1.3MP</i></div><div style="text-align: justify;"><i>Fitur: Multi Window, Samsung WatchON, ChatOn</i></div><div style="text-align: justify;"><i>Konektivitas: WiFi/GPRS/EDGE/WLAN</i></div><div style="text-align: justify;"><i>Baterai: Nonremovable</i></div><div style="text-align: justify;"><i>LiIon</i></div><div style="text-align: justify;"><i>4000 mAh battery</i></div><div style="text-align: justify;"><i><br /></i></div><h3 style="text-align: justify;"><span style="color: blue;">Harga Samsung Galaxy Tab 3 Juni 2015</span></h3><div style="text-align: justify;"><span style="color: red;">Harga Baru : Rp. 3.100.000</span></div><div style="text-align: justify;"><span style="color: red;">Harga Bekas/Second : Rp. 2.450.000 </span></div><div style="text-align: justify;"><br /></div><div style="text-align: justify;">Demikianlah informasi <b><u><i>Samsung Galaxy Tab 3 harga</i></u></b>. Admin berharap informasi diatas berguna buat kawan pembaca. Kunjungi terus blog ini sebagai informasi rujukan <span style="background-color: white; color: #222222; font-family: arial, helvetica, sans-serif; font-size: 13px; white-space: nowrap;"><b><a href="http://farrayroom.blogspot.com/" target="_blank">harga handphone samsung</a></b> terbaru dan terupdate.</span></div></p>

Harga Samsung Galaxy Tab 3 Dan Spesifikasi Terbaru 2015 - Smartphone yang satu ini pastinya sudah tidak asing lagi bagi kita. Samsung Galax...

Google Talk XMPP VB.Net

<p><div style="text-align: justify;"><b><a href="http://farrayroom.blogspot.com/2015/05/google-talk-xmpp-vbnet.html" target="_blank">Google Talk XMPP VB.Net</a>. </b>Buat sobat yang pengin mendapatkan project yang telah admin buat silahkan kunjungi link berikut ini <a href="http://www.mediafire.com/download/7sqss4e43riig6c/gtalk+in+vb.net.zip" target="_blank">google talk vb.net</a>. Sekian dari admin, tolong bantu untuk share ke teman-teman yang lain, siapa tau akan bermanfaat juga buat mereka, dan pastinya sobat akan mendapatkan pahala juga, aamiin... :)</div><div style="text-align: justify;"><br /></div><h3 style="text-align: justify;">Google talk in VB.Net</h3><div><br /></div><div style="text-align: justify;"><span style="color: blue;"><i>Imports agsXMPP</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>Imports agsXMPP.protocol.client</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>Public Class Form1</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Dim objXmpp As New XmppClientConnection</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Dim Jid As Jid</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Dim Receiver As String</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Dim _wait As Boolean</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private WithEvents TmrContact As New Timer</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub BtnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLogin.Click</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        BtnLogin.Enabled = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Application.DoEvents()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        If Not LCase(txtJid.Text).Contains("@gmail.com") Then txtJid.Text &= "@gmail.com"</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Jid = New Jid(txtJid.Text)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        With objXmpp</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .Server = "gmail.com" 'Jid.Server</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .ConnectServer = "talk.google.com"</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .Username = Jid.User</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .Password = txtPassword.Text</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            '.Resource = String.Empty</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            '.Priority = CInt(numPriority.Value)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            '.Port = Integer.Parse(txtPort.Text)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .AutoResolveConnectServer = True</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .UseStartTLS = True</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            'If (chkRegister.Checked) Then</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            '    .RegisterAccount = True</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            'Else</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            '    .RegisterAccount = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            'End If</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .Open()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            AddHandler .OnAuthError, AddressOf OnAuthError</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            AddHandler .OnLogin, AddressOf OnLogin</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            AddHandler .OnPresence, AddressOf OnPresence</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            AddHandler .OnMessage, AddressOf MsgReceived</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            AddHandler .OnClose, AddressOf OnClose</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            AddHandler .OnError, AddressOf OnError</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        End With</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub OnAuthError(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Control.CheckForIllegalCrossThreadCalls = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.Text = "OnAuthError"</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.ForeColor = Color.Red</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    ' Is raised when login and authentication is finished </i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub OnLogin(ByVal sender As Object)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Control.CheckForIllegalCrossThreadCalls = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        _wait = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.Text = "Logged In"</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.ForeColor = Color.Green</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        With TmrContact</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .Interval = 1000</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            .Start()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        End With</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    'get contacts</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub OnPresence(ByVal sender As Object, ByVal pres As Presence)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Control.CheckForIllegalCrossThreadCalls = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'If LBContacts.Items.Count = 0 Then</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LBContacts.Items.Add(pres.From.User & "@" & pres.From.Server)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        '    Return</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'End If</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub ShowMsg(ByVal Text As String)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Control.CheckForIllegalCrossThreadCalls = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TxtMsgIn.Text = TxtMsgIn.Text.Insert(0, Text & vbCrLf & vbCrLf)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub MsgReceived(ByVal sender As Object, ByVal msg As Message)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Dim arrUser() As String</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        arrUser = msg.From.ToString.Split("/")</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Receiver = arrUser(0)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        If msg.Body = "" Then Return</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        ShowMsg(Receiver & " <" & Now & "> :" & vbCrLf & msg.Body)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Me.Focus()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        ''======================</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        ''BUAT AUTO REPLY</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'Dim chatMessage() As String</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'chatMessage = msg.From.ToString.Split("/")</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'jid = New Jid(chatMessage(0))</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'Dim autoReply As Message</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'autoReply = New Message(jid, MessageType.chat, txtMsgOut.Text & " : http://gtalkautoreply.codeplex.com/")</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        'objXmpp.Send(autoReply)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        ''======================</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub OnClose(ByVal sender As Object)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Control.CheckForIllegalCrossThreadCalls = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.Text = "Logout"</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.ForeColor = Color.Red</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub OnError(ByVal sender As Object, ByVal ex As Exception)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Control.CheckForIllegalCrossThreadCalls = False</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.Text = "OnError"</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LblStatus.ForeColor = Color.Red</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub TmrContact_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrContact.Tick</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TmrContact.Stop()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        AddHandler objXmpp.OnPresence, AddressOf OnPresence</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TmrContact.Start()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub BtnLogout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLogout.Click</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        objXmpp.Close()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        LBContacts.Items.Clear()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TxtMsgIn.Clear()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TxtTo.Clear()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TxtMsgOut.Clear()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        BtnLogin.Enabled = True</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub BtnSend_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSend.Click</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Try</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            objXmpp.Send(New Message(New Jid(TxtTo.Text), MessageType.chat, TxtMsgOut.Text))</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            ShowMsg(txtJid.Text & " <" & Now & "> :" & vbCrLf & TxtMsgOut.Text)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        Catch ex As Exception</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>            MsgBox(ex.Message, MsgBoxStyle.Critical, Text)</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        End Try</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i><br /></i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    Private Sub LBContacts_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles LBContacts.DoubleClick</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TxtTo.Text = LBContacts.SelectedItem</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>        TxtMsgOut.Focus()</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>    End Sub</i></span></div><div style="text-align: justify;"><span style="color: blue;"><i>End Class</i></span></div></p>

Google Talk XMPP VB.Net . Buat sobat yang pengin mendapatkan project yang telah admin buat silahkan kunjungi link berikut ini google talk ...

GTalk Source Code VB Net

<p><div style="text-align: justify;"><b><a href="http://farrayroom.blogspot.com/2015/05/gtalk-source-code-vb-net.html" target="_blank">GTalk Source Code VB Net</a></b> - Ini adalah cara termudah dan tercepat membuat gtalk client sendiri. Sobat dapat memanfaatkan metode ini untuk develop aplikasi sendiri, baik itu sebagai gateway atau untuk personal chating.</div><div style="text-align: justify;"><br /></div><div style="text-align: justify;">Berbicara mengenai aplikasi gateway yang menggunakan gtalk, hal ini biasanya banyak digunakan oleh para developer program server pulsa, teknik ini biasa dinamakan H2H (host to host) melalui jaringan internet dengan perantara gtalk. Selain menggunakan gtalk, yahoo messenger (ym) pun dapat dimanfaatkan untuk H2H antar server, untuk tutorialnya silahkan kunjungi <a href="http://www.youtube.com/watch?v=zACSaYzRC84" target="_blank">Login to Yahoo Messenger With VB.Net</a>.</div><div style="text-align: justify;"><br /></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjKzpXTDpCtq6qDLPo_kbaBevRgoOo_zXzdB65gsHwnQsFoEb8Ny20gt8SbTgYV-E1BShhjyEffpUEr6wD2hJ5cbt_l7SjwbTkqOX6VPfoTf_GCRkmweg9zoVSS67xlwdPrqjuOWAhy2dlT/s1600/GTalk+Source+Code+VB+Net.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="gtalk source code vb net" border="0" height="320" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjKzpXTDpCtq6qDLPo_kbaBevRgoOo_zXzdB65gsHwnQsFoEb8Ny20gt8SbTgYV-E1BShhjyEffpUEr6wD2hJ5cbt_l7SjwbTkqOX6VPfoTf_GCRkmweg9zoVSS67xlwdPrqjuOWAhy2dlT/s320/GTalk+Source+Code+VB+Net.png" title="gtalk source code vb net" width="320" /></a></div><div style="text-align: justify;"><br /></div><div style="text-align: justify;"><b><u>Source code gtalk vb.net</u></b> ini admin kembangkan dengan menggunakan <a href="http://farrayroom.blogspot.com/" target="_blank">protokol xmpp</a>, dan untuk mengetahui lebih lanjut apa itu xmpp silahkan sobat googling sendiri :D. Oke langsung aja kita lihat source codenya dibawah ini.</div><div style="text-align: justify;"><br /></div><div style="text-align: justify;"><span style="color: blue;">Imports agsXMPP</span></div><div style="text-align: justify;"><span style="color: blue;">Imports agsXMPP.protocol.client</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">Public Class Form1</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Dim objXmpp As New XmppClientConnection</span></div><div style="text-align: justify;"><span style="color: blue;">    Dim Jid As Jid</span></div><div style="text-align: justify;"><span style="color: blue;">    Dim Receiver As String</span></div><div style="text-align: justify;"><span style="color: blue;">    Dim _wait As Boolean</span></div><div style="text-align: justify;"><span style="color: blue;">    Private WithEvents TmrContact As New Timer</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub BtnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLogin.Click</span></div><div style="text-align: justify;"><span style="color: blue;">        BtnLogin.Enabled = False</span></div><div style="text-align: justify;"><span style="color: blue;">        Application.DoEvents()</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        If Not LCase(txtJid.Text).Contains("@gmail.com") Then txtJid.Text &= "@gmail.com"</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        Jid = New Jid(txtJid.Text)</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        With objXmpp</span></div><div style="text-align: justify;"><span style="color: blue;">            .Server = "gmail.com" 'Jid.Server</span></div><div style="text-align: justify;"><span style="color: blue;">            .ConnectServer = "talk.google.com"</span></div><div style="text-align: justify;"><span style="color: blue;">            .Username = Jid.User</span></div><div style="text-align: justify;"><span style="color: blue;">            .Password = txtPassword.Text</span></div><div style="text-align: justify;"><span style="color: blue;">            '.Resource = String.Empty</span></div><div style="text-align: justify;"><span style="color: blue;">            '.Priority = CInt(numPriority.Value)</span></div><div style="text-align: justify;"><span style="color: blue;">            '.Port = Integer.Parse(txtPort.Text)</span></div><div style="text-align: justify;"><span style="color: blue;">            .AutoResolveConnectServer = True</span></div><div style="text-align: justify;"><span style="color: blue;">            .UseStartTLS = True</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">            'If (chkRegister.Checked) Then</span></div><div style="text-align: justify;"><span style="color: blue;">            '    .RegisterAccount = True</span></div><div style="text-align: justify;"><span style="color: blue;">            'Else</span></div><div style="text-align: justify;"><span style="color: blue;">            '    .RegisterAccount = False</span></div><div style="text-align: justify;"><span style="color: blue;">            'End If</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">            .Open()</span></div><div style="text-align: justify;"><span style="color: blue;">            AddHandler .OnAuthError, AddressOf OnAuthError</span></div><div style="text-align: justify;"><span style="color: blue;">            AddHandler .OnLogin, AddressOf OnLogin</span></div><div style="text-align: justify;"><span style="color: blue;">            AddHandler .OnPresence, AddressOf OnPresence</span></div><div style="text-align: justify;"><span style="color: blue;">            AddHandler .OnMessage, AddressOf MsgReceived</span></div><div style="text-align: justify;"><span style="color: blue;">            AddHandler .OnClose, AddressOf OnClose</span></div><div style="text-align: justify;"><span style="color: blue;">            AddHandler .OnError, AddressOf OnError</span></div><div style="text-align: justify;"><span style="color: blue;">        End With</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub OnAuthError(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)</span></div><div style="text-align: justify;"><span style="color: blue;">        Control.CheckForIllegalCrossThreadCalls = False</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.Text = "OnAuthError"</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.ForeColor = Color.Red</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    ' Is raised when login and authentication is finished </span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub OnLogin(ByVal sender As Object)</span></div><div style="text-align: justify;"><span style="color: blue;">        Control.CheckForIllegalCrossThreadCalls = False</span></div><div style="text-align: justify;"><span style="color: blue;">        _wait = False</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.Text = "Logged In"</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.ForeColor = Color.Green</span></div><div style="text-align: justify;"><span style="color: blue;">        With TmrContact</span></div><div style="text-align: justify;"><span style="color: blue;">            .Interval = 1000</span></div><div style="text-align: justify;"><span style="color: blue;">            .Start()</span></div><div style="text-align: justify;"><span style="color: blue;">        End With</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    'get contacts</span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub OnPresence(ByVal sender As Object, ByVal pres As Presence)</span></div><div style="text-align: justify;"><span style="color: blue;">        Control.CheckForIllegalCrossThreadCalls = False</span></div><div style="text-align: justify;"><span style="color: blue;">        'If LBContacts.Items.Count = 0 Then</span></div><div style="text-align: justify;"><span style="color: blue;">        LBContacts.Items.Add(pres.From.User & "@" & pres.From.Server)</span></div><div style="text-align: justify;"><span style="color: blue;">        '    Return</span></div><div style="text-align: justify;"><span style="color: blue;">        'End If</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub ShowMsg(ByVal Text As String)</span></div><div style="text-align: justify;"><span style="color: blue;">        Control.CheckForIllegalCrossThreadCalls = False</span></div><div style="text-align: justify;"><span style="color: blue;">        TxtMsgIn.Text = TxtMsgIn.Text.Insert(0, Text & vbCrLf & vbCrLf)</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub MsgReceived(ByVal sender As Object, ByVal msg As Message)</span></div><div style="text-align: justify;"><span style="color: blue;">        Dim arrUser() As String</span></div><div style="text-align: justify;"><span style="color: blue;">        arrUser = msg.From.ToString.Split("/")</span></div><div style="text-align: justify;"><span style="color: blue;">        Receiver = arrUser(0)</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        If msg.Body = "" Then Return</span></div><div style="text-align: justify;"><span style="color: blue;">        ShowMsg(Receiver & " <" & Now & "> :" & vbCrLf & msg.Body)</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        Me.Focus()</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        ''======================</span></div><div style="text-align: justify;"><span style="color: blue;">        ''BUAT AUTO REPLY</span></div><div style="text-align: justify;"><span style="color: blue;">        'Dim chatMessage() As String</span></div><div style="text-align: justify;"><span style="color: blue;">        'chatMessage = msg.From.ToString.Split("/")</span></div><div style="text-align: justify;"><span style="color: blue;">        'jid = New Jid(chatMessage(0))</span></div><div style="text-align: justify;"><span style="color: blue;">        'Dim autoReply As Message</span></div><div style="text-align: justify;"><span style="color: blue;">        'autoReply = New Message(jid, MessageType.chat, txtMsgOut.Text & " : http://gtalkautoreply.codeplex.com/")</span></div><div style="text-align: justify;"><span style="color: blue;">        'objXmpp.Send(autoReply)</span></div><div style="text-align: justify;"><span style="color: blue;">        ''======================</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub OnClose(ByVal sender As Object)</span></div><div style="text-align: justify;"><span style="color: blue;">        Control.CheckForIllegalCrossThreadCalls = False</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.Text = "Logout"</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.ForeColor = Color.Red</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub OnError(ByVal sender As Object, ByVal ex As Exception)</span></div><div style="text-align: justify;"><span style="color: blue;">        Control.CheckForIllegalCrossThreadCalls = False</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.Text = "OnError"</span></div><div style="text-align: justify;"><span style="color: blue;">        LblStatus.ForeColor = Color.Red</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub TmrContact_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrContact.Tick</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">        TmrContact.Stop()</span></div><div style="text-align: justify;"><span style="color: blue;">        AddHandler objXmpp.OnPresence, AddressOf OnPresence</span></div><div style="text-align: justify;"><span style="color: blue;">        TmrContact.Start()</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub BtnLogout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLogout.Click</span></div><div style="text-align: justify;"><span style="color: blue;">        objXmpp.Close()</span></div><div style="text-align: justify;"><span style="color: blue;">        LBContacts.Items.Clear()</span></div><div style="text-align: justify;"><span style="color: blue;">        TxtMsgIn.Clear()</span></div><div style="text-align: justify;"><span style="color: blue;">        TxtTo.Clear()</span></div><div style="text-align: justify;"><span style="color: blue;">        TxtMsgOut.Clear()</span></div><div style="text-align: justify;"><span style="color: blue;">        BtnLogin.Enabled = True</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub BtnSend_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSend.Click</span></div><div style="text-align: justify;"><span style="color: blue;">        Try</span></div><div style="text-align: justify;"><span style="color: blue;">            objXmpp.Send(New Message(New Jid(TxtTo.Text), MessageType.chat, TxtMsgOut.Text))</span></div><div style="text-align: justify;"><span style="color: blue;">            ShowMsg(txtJid.Text & " <" & Now & "> :" & vbCrLf & TxtMsgOut.Text)</span></div><div style="text-align: justify;"><span style="color: blue;">        Catch ex As Exception</span></div><div style="text-align: justify;"><span style="color: blue;">            MsgBox(ex.Message, MsgBoxStyle.Critical, Text)</span></div><div style="text-align: justify;"><span style="color: blue;">        End Try</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;"><br /></span></div><div style="text-align: justify;"><span style="color: blue;">    Private Sub LBContacts_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles LBContacts.DoubleClick</span></div><div style="text-align: justify;"><span style="color: blue;">        TxtTo.Text = LBContacts.SelectedItem</span></div><div style="text-align: justify;"><span style="color: blue;">        TxtMsgOut.Focus()</span></div><div style="text-align: justify;"><span style="color: blue;">    End Sub</span></div><div style="text-align: justify;"><span style="color: blue;">End Class</span></div><div style="text-align: justify;"><br /></div><div style="text-align: justify;">Nah itulah sedikit ulasan mengenai <b><u>google talk xmpp vb.net</u></b> semoga dapat bermanfaat buat kita semua. Untuk project beserta sourcenya yang telah admin buat, silahkan kunjungi halaman <a href="http://farrayroom.blogspot.com/2015/05/google-talk-xmpp-vbnet.html" target="_blank">create gtalk in vb.net</a>.<br /><br /><h3>Video create gtalk using vb.net</h3><br /><div class="separator" style="clear: both; text-align: center;"><iframe allowfullscreen="" class="YOUTUBE-iframe-video" data-thumbnail-src="https://i.ytimg.com/vi/PGvZLOrEAcw/0.jpg" frameborder="0" height="266" src="https://www.youtube.com/embed/PGvZLOrEAcw?feature=player_embedded" width="320"></iframe></div><br /></div></p>

GTalk Source Code VB Net - Ini adalah cara termudah dan tercepat membuat gtalk client sendiri. Sobat dapat memanfaatkan metode ini untuk de...