فرم کار نمیکنه؟

[hamid1395]

سلا م دوستان

من این مشکلم رو چند جا گفتم ولی اصلا کسی جواب نداد.
شاید چیز پیش پا افتاده باشه . ولی من بلد نیستم
اشکال این فرم چیه؟هیچی تو دیتابیس نمی ریزه.
دیتابیس من sql هست
ممنون میشم راهنمایی کنین
من تا شنبه صبح وقت دارم.

[arashrj]

سلام

کدت کامل نبود . دستورات به بانک ارسال نمی شد به همین دلیل هم ...
یه نمونه کد برات نوشتم

کد:

Imports System.Data.SqlClient

Partial Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim conn1 As New SqlConnection("server=localhost;uid=sa;pwd=;database=db1")
        Dim cmd As New SqlCommand("insert into tb_test (FLName,email) Values ('ArashRJ','arashrj@gmail.com')", conn1)
        conn1.Open()
        cmd.ExecuteNonQuery()
        conn1.Close()
    End Sub
End Class

موفق باشی

[mbza11]

سلام.
خوب جواب رو که دوست عزيز arashrj دادند.
يه سوال:
چرا از آبجکت هاي خود Net. که داخل تولبار و قسمت ديتا هست مثل SQLDataSource استفاده نکردي؟
کار با اين خيلي راحت تره و احتمال اشتباه و خطا هم خيلي مياد پايين.

[hamid1395]

arashrj عزیز
شرمنده این کد کار نمی کنه erorr میده

mbza11 جان
نمیتونم از خروجی بگیرم در مورد فرم جواب نداد

[arashrj]

سلام
مطمئن هستم کار می کنه (چون اول تست می کنم بعد کد رو قرار می دم!)
اگه ممکنه متن خطا رو بنویس . مشخص کن کدوم خط تولید خطا کرد
بانک رو درست ساختی ؟ تبیل رو چطور ؟ فیلد ها رو از چه نوعی تعریف کردی ؟ ...؟

موفق باشی

[hamid1395]

شرمنده مشکل erorr حل شد یه " اضافه زده بودم

حالا یه مشکلی که هست من میخوام اطلاعات از فرم ریخته بشه
از @ استفاده می کنم ولی جواب نمیده.
اسم فیلدهام company , tel هست

بعد من یه سوال دیگه هم داشتم
چه جوری می تونم یه عدد تصادفی درست کنم که هم اونو نشون بده و هم تو یه دیتابیس بریزه

[arashrj]

سلام
کدت رو قرار بده تا بگم کجاش رو اشتباه نوشتی
برای عدد تصادفی هم کد زیر رو برات نوشتم :

کد:

Randomize()
        Dim ARJ As Integer
        ARJ = Rnd() * 1000
        TextBox1.Text = ARJ

موق باشی

[hamid1395]

سلام
ممنون بابت کد
این هم کد
شرمنده

[arashrj]

سلام
قبل از کد (cmd.ExecuteNonQuery()) کد زیر رو باید اضافه کنی

کد:

cmd.Parameters.Add("@tel", SqlDbType.nvarchar).Value = textbox1.text
cmd.Parameters.Add("@company", SqlDbType.nvarchar).Value = textbox2.text

موفق باشی

[hamid1395]

سلام
لطف کردین خیلی ممنون