[Tutorial]Belajar Programming .NET Language

[premier30]

boleh jer bro cmtue..

cer ajar.

bg aku email ko..aku email dkt ko project dh siap..mls plk nk taip dlm ni

 

[Hitman™]

bg aku email ko..aku email dkt ko project dh siap..mls plk nk taip dlm ni

bro aku dah PM..

 

[premier30]

bro aku dah PM..

aku dh email..ko ade dpt x

 

[mutanic]

professional...need your help.

cmner aku nk wat listbox aku..kuar data dari database ms access?

then bila aku select, dye akan kuarkan harga tue.

(neh form aku)

dulu masa main VB ada la pakai listbox ni, tp skrg main C#.Net asyik pakai control aspropdownList jer...selalu kalu aku ada dropdownlist yang mana value'nya aku boleh control, aku akan load sume list tu dari SPList/DataTable/DataSource yang simpan value2 tersebut...kena masukkan dalam Form Load/Page Load call function untuk load value dropdown list...

Function tu plak, nko kena set connection ke SPList/DataTable/DataSource a.k.a database tu, pastu gunakan foreach atau for untuk loop dapatkan value & assign ke dropdown list...

        protected void Page_Init()
        {
            LoadStatusList();
        **

        public void LoadStatusList()
        {
            try
            {
                using (SPSite spSite = SPContext.Current.Site)
                {
                    using (SPWeb spWeb = spSite.OpenWeb())
                    {
                        SPList spListOpen = spWeb.Lists["Status"];

                        SPQuery spQuery = new SPQuery();

                        spQuery.Query = "<Where><Eq><FieldRef Name='Activator' /><Value Type='Boolean'>1</Value></Eq></Where>";
                        SPListItemCollection spItemCollection = spListOpen.GetItems(spQuery);

                        if (!spItemCollection.Count.Equals(0))
                        {
                            ddlStatus.Items.Add("Please select...");
                            ddlStatus.SelectedItem.Attributes.CssStyle.Add("color", "Red");
                            int i = 0;
                            foreach (SPListItem spItem in spItemCollection)
                            {
                                string statAct = spItem["Activator"].ToString();
                                string statVal = spItem["Title"].ToString();

                                if (statAct.Equals("True"))
                                {
                                    ddlStatus.Visible = true;
                                    ddlStatus.Items.Add(spItem["Title"].ToString());
                                    i++;
                                    ddlStatus.SelectedValue = null;
                                **
                            **
                        **
                        else
                        {
                            ddlStatus.BackColor = System.Drawing.Color.Red;
                            Page.ClientScript.RegisterStartupScript(this.GetType(), "Alert", "alert('Data not available in Status dropdown list!');", true);
                        **
                    **
                **
            **
            catch (Exception ex)
            {
                Page.ClientScript.RegisterStartupScript(this.GetType(), "Alert", "alert('Error at populate Status value : " + ex.Message + "');", true);
            **
        **

*** ddlStatus adalah control <aspropdownList>

part ni untuk aku establish connection (cara nak connect adalah berbeza bergantung pada source nko, dalam kes ni aku pakai SPList - Sharepoint) ke SPList yang simpan value & aku cuma load value yang aku nak melalui query...WHY? sbb aku set condition mana2 value yang aku set as active jer akan kuar dalam dropdown list nnt, HOW? dalam SPList/DataTable/DataSource aku contohnya ada 2 column jer :

Value = Format(Text)
Activator = Format(Boolean)/Choice(Yes/No)

Contoh data :

Value || Activator
New || Yes
Existing || Yes
Closed || Yes
Open || No
Permanent || No

Hanya value yang aku set Activator as Yes jer akan di load ke dropdown list.

                using (SPSite spSite = SPContext.Current.Site)
                {
                    using (SPWeb spWeb = spSite.OpenWeb())
                    {
                        SPList spListOpen = spWeb.Lists["Status"];

                        SPQuery spQuery = new SPQuery();

                        spQuery.Query = "<Where><Eq><FieldRef Name='Activator' /><Value Type='Boolean'>1</Value></Eq></Where>";
                        SPListItemCollection spItemCollection = spListOpen.GetItems(spQuery);

pastu kalu hasil dari query aku ada result & value, baru aku akan assign ke dropdown list :

                        if (!spItemCollection.Count.Equals(0))
                        {
                            ddlStatus.Items.Add("Please select...");
                            ddlStatus.SelectedItem.Attributes.CssStyle.Add("color", "Red");
                            int i = 0;
                            foreach (SPListItem spItem in spItemCollection)
                            {
                                string statAct = spItem["Activator"].ToString();
                                string statVal = spItem["Title"].ToString();

                                if (statAct.Equals("True"))
                                {
                                    ddlStatus.Visible = true;
                                    ddlStatus.Items.Add(spItem["Title"].ToString());
                                    i++;
                                    ddlStatus.SelectedValue = null;
                                **
                            **
                        **

*** lupa plak, nko nyer request ada 2 sebenarnya :
1- Load value Item dari database pastu assign ke ListBox
2- Bila select jer value dari ListBox tu pastu automatic akan papar price untuk item tu ~ part ni aku x pastu samada nko nak papar price for each item atau total price base on quantity, sila confirm part ni!

 

[mutanic]

aku nyer post ni xda sapa2 boleh tolong ka???

http://www.carigold.com/portal/forums/showpost.php?p=15666475&postcount=113

 

[d-10]

knp sblm ni sy x pnh jumpa thread ni?

sy nak authenticate users guna active directory..
da jenuh mengoogle tp x bp jalan utk di apply dlm current system.
boleh sesapa tunjuk ajar..

Parser Error Message: Unable to establish secure connection with the server

Source Error:


Line 44: <membership defaultProvider="MyADMembershipProvider">
Line 45: <providers>
Line 46: <add name="MyADMembershipProvider" type="System.Web.Security.ActiveDirectoryMembershipProvider,System.Web, Version=2.0.0.0, Culture=neutral,PublicKeyToken=b03f5f7f11d50a3a"
Line 47: connectionStringName="ADConnectionString"
Line 48: attributeMapUsername="sAMAccountName"/>

 

[kubiz]

Tak sabar nak tgk tutorial seterusnya dari TT

 

[Erazer]

Tak sabar nak tgk tutorial seterusnya dari TT

Nanti saya update, sekarang sibuk dengan kerja hakiki.

 

[Hitman™]

 Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        Dim MyConnection As OleDb.OleDbConnection = Nothing
        Dim MyTransaction As OleDb.OleDbTransaction = Nothing
        Try
            'mulakan transaksi dan connection
            MyConnection = New OleDb.OleDbConnection(My.Settings.Sistem_Transaksi_Kedai_PasuConnectionString)
            MyConnection.Open()
            MyTransaction = MyConnection.BeginTransaction

            'ambik id dari recipt
            Dim sql As String
            sql = "select max (NoTransaction) as MAXNO from Transaction"
            Dim CMD2 As New OleDb.OleDbCommand
            CMD2.Connection = MyConnection
            CMD2.Transaction = MyTransaction
            CMD2.CommandText = Sql
            Dim NoTransaction As Long = CMD2.ExecuteScalar()
            CMD2.Dispose()

            'masukkan detail recipt
            Dim i As Integer
            For i = 0 To DGV2.Rows.Count - 1

                'get the value
                Dim NoProduct As String = DGV2.Rows(i).Cells(0).Value
                Dim Price As Decimal = DGV2.Rows(i).Cells(2).Value
                Dim Quantity As Integer = DGV2.Rows(i).Cells(3).Value

                'create command
                Dim CMD3 As New OleDb.OleDbCommand
                sql = "insert into Transaction" & _
                      "(NoTransaction,NoProduct,TotalPrice,Quantity,DateTime) " & _
                      "values " & _
                      "(:0           ,:1       ,:2        ,:3      ,:4) "
                CMD3.Connection = MyConnection
                CMD3.Transaction = MyTransaction
                CMD3.CommandText = Sql
                CMD3.Parameters.AddWithValue(":0", NoTransaction)
                CMD3.Parameters.AddWithValue(":1", NoProduct)
                CMD3.Parameters.AddWithValue(":2", Quantity)
                CMD3.Parameters.AddWithValue(":3", Price)
                CMD3.Parameters.AddWithValue(":4", Now.TimeOfDay)

                CMD3.ExecuteNonQuery()
                CMD3.Dispose()




            Next

            'save changes
            MyTransaction.Commit()

            'close connection
            MyTransaction.Dispose()
            MyConnection.Close()
            MyConnection.Dispose()

            DGV2.Rows.Clear()
            TextBox4.Text = ""

        Catch ex As Exception

            If MyTransaction IsNot Nothing Then
                MyTransaction.Rollback()
                MsgBox(ex.Message, MsgBoxStyle.Critical Or MsgBoxStyle.OkOnly, "error")
            End If
            If MyConnection IsNot Nothing Then
                If MyConnection.State = ConnectionState.Open Then
                    MyConnection.Close()
                End If
            End If

        End Try

aku guna insert into untuk masukkan data dalam database

tp keluar error

"syntax error in from clause"

 

[mutanic]

 Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        Dim MyConnection As OleDb.OleDbConnection = Nothing
        Dim MyTransaction As OleDb.OleDbTransaction = Nothing
        Try
            'mulakan transaksi dan connection
            MyConnection = New OleDb.OleDbConnection(My.Settings.Sistem_Transaksi_Kedai_PasuConnectionString)
            MyConnection.Open()
            MyTransaction = MyConnection.BeginTransaction

            'ambik id dari recipt
            Dim sql As String
            sql = "select max (NoTransaction) as MAXNO from Transaction"
            Dim CMD2 As New OleDb.OleDbCommand
            CMD2.Connection = MyConnection
            CMD2.Transaction = MyTransaction
            CMD2.CommandText = Sql
            Dim NoTransaction As Long = CMD2.ExecuteScalar()
            CMD2.Dispose()

            'masukkan detail recipt
            Dim i As Integer
            For i = 0 To DGV2.Rows.Count - 1

                'get the value
                Dim NoProduct As String = DGV2.Rows(i).Cells(0).Value
                Dim Price As Decimal = DGV2.Rows(i).Cells(2).Value
                Dim Quantity As Integer = DGV2.Rows(i).Cells(3).Value

                'create command
                Dim CMD3 As New OleDb.OleDbCommand
                sql = "insert into Transaction" & _
                      "(NoTransaction,NoProduct,TotalPrice,Quantity,DateTime) " & _
                      "values " & _
                      "(:0           ,:1       ,:2        ,:3      ,:4) "
                CMD3.Connection = MyConnection
                CMD3.Transaction = MyTransaction
                CMD3.CommandText = Sql
                CMD3.Parameters.AddWithValue(":0", NoTransaction)
                CMD3.Parameters.AddWithValue(":1", NoProduct)
                CMD3.Parameters.AddWithValue(":2", Quantity)
                CMD3.Parameters.AddWithValue(":3", Price)
                CMD3.Parameters.AddWithValue(":4", Now.TimeOfDay)

                CMD3.ExecuteNonQuery()
                CMD3.Dispose()




            Next

            'save changes
            MyTransaction.Commit()

            'close connection
            MyTransaction.Dispose()
            MyConnection.Close()
            MyConnection.Dispose()

            DGV2.Rows.Clear()
            TextBox4.Text = ""

        Catch ex As Exception

            If MyTransaction IsNot Nothing Then
                MyTransaction.Rollback()
                MsgBox(ex.Message, MsgBoxStyle.Critical Or MsgBoxStyle.OkOnly, "error")
            End If
            If MyConnection IsNot Nothing Then
                If MyConnection.State = ConnectionState.Open Then
                    MyConnection.Close()
                End If
            End If

        End Try

aku guna insert into untuk masukkan data dalam database

tp keluar error

"syntax error in from clause"

nko salah kat query nko tu :

sql = "select max (NoTransaction) as MAXNO from Transaction"

dah test query ni dalam DB belum? kalu success dpt result meaning query nko OK tp base on error yg nko dpt tadi tu sah2 silap kat sini...:-?

try ubah jadi camni :

sql = @"SELECT MAX [NoTransaction] AS MAXNO FROM [DatabaseAku].[dbo].[tbl_Transaction];";