Search VB 2010

Showing posts with label Visual Basic .Net and SQL Server Date-Time. Show all posts
Showing posts with label Visual Basic .Net and SQL Server Date-Time. Show all posts

Friday, November 25, 2011

VB.Net SqlServer DateTime Insertion

Dealing with Date/Time in VB.Net and SQLServer

It's been a nightmare since i decided to insert DateTime value into Sql Server 2000 DataBase Table Field Type as SmallDateTime.It took me 3 days and nights trying to work it around.I've did everything i know and everything other told me to do.Finally, i figured it out.
Look ....
Say, you have a Vb.Net 2005 Project with a form contains a DateTimePicker Control called (Q3) and Button Called (B3) Text Property as (Insert), and you have Sql Server 2000 DataBase called (Market) with Table Called (Purchase) includes a Field called (EXdt) Type as (SmallDateTime) Length (4), and you want to update it using Ado.Net Online Mode.
1) Calling The Ado.Net for Sql Server DataBase
Imports System.Data.SqlClient
2) Assigning your variables
Dim CN As New SqlClient.SqlConnection
Dim cPur As New SqlClient.SqlCommand
Dim CntRs As Integer
Dim SqlStr As String
3) Connecting your DataBase 'Market' - Form_Load Event

If CN.State = ConnectionState.Open Then CN.Close()
        CN.ConnectionString = "Data Source=Your_Sql_Server_Name;Initial Catalog=Market;Integrated Security=True"
        CN.Open()
4) Connecting your table 'Purchase' - Form_Load Event

SqlStr = "Select * from Purchase"
        With cPur
            .Connection = CN
            .CommandType = CommandType.Text
            .CommandText = SqlStr
        End With
5) Inserting the date within the DateTimePicker Control (Q3) Into Field (EXdt)
SqlStr = "Insert Into Purchase (ExDT) Values ('" & Q3.Value.ToString("yyyy/MM/dd") & "')"
cPur.CommandText = SqlStr

CntRs = cPur.ExecuteNonQuery()
        MsgBox("( " & CntRs & " ) Record(s) Saved")
Congratulations ....
Download The Source Code Via MediaFire Link

If you have any other problem contact me by Comments - or -
you can simply Google me for more solutions (evry1falls - Your Problem)


Friday, November 04, 2011

Visual Basic Online Course - SQL Server

قمنا بربط الـ Visual Basic .Net مع قاعدة بيانات من نوع MS Sql Server 2000 و قمنا بعمل مشروع Project باسم (SqlServer2000) عبارة عن Form تحتوى على Name - BirthDate - Age
و الان سنقوم ببرمجة المفاتيح الموجوده على Form و هى (New - Save - Edit - Delete - Search - Exit) و هى تعتبر مفاتيح رئيسية فى جميع المشروعات و يبقى المفتاح (Print) و سنقوم (ان شاء الله) ببرمجته فى موضوع لاحق لانه مرتبط بالتقارير Crystal Reports .
أولا : المفتاح New

و وظيفته تفريغ الخانات الموجوده على الـ Form لتهيئتها لاستقبال قيم جديده .
Code :
الاجراء ClearAll

ثم فى الحدث Click للمفتاح New نضع اسم الاجراء

الحدث Click للاداه Button1 مفتاح New

قم بتجربة المفتاح و املأ الادوات على الـ Form و لاحظ ..

ثانيا : المفتاح Save
و وظيفته حفظ القيم المدخلة فى الادوات فى جدول Basic قاعدة البيانات Info
Code : 

الحدث Click للاداه Buuton2 مفتاح الحفظ
قم بكتابة البيانات على الفورم فى جميع الخانات و اضغط على حفظ و لاحظ .





ايضا سنقوم بعمل معادلة لحساب السن تلقائيا بمجرد تغيير تاريخ الميلاد كالتالى .
الحدث ValueChanged للاداه DateTimePicker1 لحساب العمر تلقائيا

قم بتكرار حفظ جديد و لاحظ عند تسجيل تاريخ الميلاد يظهر السن تلقائيا و اضغط على Save و لاحظ ...
عند فتح جدول قاعدة البيانات سيكون لديك عدد (2) سجل ... أى ان التسجيل تم بنجاح . 
ثالثا : المفتاح Search
و سيكون البحث بدلالة الاسم Name
Code :

الحدث Click للاداه Button5 مفتاح البحث بدلالة الاسم






وسنقوم بالضغط على مفتاح Search ونكتب اى اسم تم حفظة و لاحظ ان البيانات تظهر على الـ Form .







رابعا : المفتاح Edit
حيث سنقوم بالبحث أولا ثم التعديل .
Code :

مفتاح التعديل Edit

نبحث عن اى سجل تم تعديلة للتأكد من التعديل .





خامسا : المفتاح Delete
بالمثل كما حدث فى التعديل سنقوم بالبحث أولا ثم الحذف .
Code :
مفتاح الحذف Delete
بعد الحذف نبحث عن سجل محذوف للتأكد من حذفه .





سادسا : المفتاح Exit
للخروج من البرنامج .
Code :


مفتاح انهاء البرنامج Exit

و السطر الاول معناه الخروج من قاعدة البيانات حتى لاتظل مفتوحة بعد الخروج من البرنامج ..

أرجو أن يكون الموضوع نال اعجابكم
أى سؤال فى التعليقات ان شاء الله .
Google Me to find Similar Useful Pages ( Evry1falls)

Here are some online Visual Basic lessons and courses :

Visual Basic Courses - Share