Lowyat.NET: Latest topics by jj90210

(WTS) General Aviation Tools PPL CPL ATPL

jj90210 — Fri, 06 Oct 2017 10:51:22 +0800

Item(s):
General Aviation Navigation Calculation Tools for Private Pilot Licence (PPL), Commercial Pilot Licence/Instrument Rating (CPL/IR), Frozen Airline Transport Pilot Licence (Frozen ATPL) EASA/FAA subject Flight Planning, General Navigation, Aircraft Performance

a) 1 x Pooleys CRP-5 Flight Computer (CRP5)
b) 1 x Jeppessen CR-3 Circular Computer (CR3)
c) 2 x Navigation Compass (Pooleys & Aviation Theory Centre Australia)
d) 2 x 110 Knots Cruise Speed Navigation Ruler
e) 2 x Navigation Ruler (Pooleys & Aviation Theory Centre Australia)
f) 1 x Daansen 391S Fuel Tester

Package includes: Refer above

Price:
a) RM450 1 x Pooleys CRP-5 Flight Computer (CRP5)
b) RM125 1 x Jeppessen CR-3 Circular Computer (CR3)
c) RM25 each 2 x Navigation Compass (Pooleys & Aviation Theory Centre Australia)
d) RM25 each 2 x 110 Knots Cruise Speed Navigation Ruler
e) RM50 each 2 x Navigation Ruler (Pooleys & Aviation Theory Centre Australia)
f) RM25 1 x Daansen 391S Fuel Tester

Warranty: As is, no warranty

Dealing method: Postage (Buyer pays) or COD within Klang Valley Area

Location: Klang Valley

Contact method/details: PM or Whatsapp 0163193133
---

Item(s) conditions: Used

Picture: Refer attachments

Reason for sale: Not using anymore

WTS - UMobile Prepaid CreditShare (Top Up)

jj90210 — Wed, 21 Jun 2017 10:12:59 +0800

Item(s): UMobile Prepaid CreditShare

Package includes: UMobile Prepaid CreditShare

Price: RM7.50 to buy credit for RM10, valid for 7 days

Warranty:

Dealing method: Online Banking

Location of seller:

Contact method/details: PM or Whatsapp 0163193133

Age of item:

---

Item(s) conditions:

Picture:

Reason for sale: Extra credits, PM for best price if you would like to buy more credits.

Please take note that validity does not stack up if you purchase more than RM10.
i.e. RM10 = 7 days validity
RM20 = 7 days validity as well

Umobile will charge service fee of RM0.20 upon successful transfer. i.e. RM10 credit will get RM9.80.

vb.net 2008 Insert data into Access DB

jj90210 — Tue, 30 Sep 2008 11:16:36 +0800

Hi!

I have this problem with my assignment in vb.net 2008, I have a access database, need to add data in the text field into the database.

In my database, i have a table name Register, with Username and Password column.

No errors in my codes, but data is not being inserted. I have 3 sets of codes, all 3 of them no errors, and not inserted into database.

Hope you can help, thanks!

Code1

Dim Conn As New ADODB.Connection
Dim rs As New ADODB.Recordset

Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databse.mdb;Persist Security Info=False"
rs.Open("SELECT * FROM Register", Conn, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)

rs.AddNew()
rs.Fields("Username").Value = Trim(TxtUsername.Text)
rs.Fields("Password").Value = Trim(TxtPassword.Text)
rs.Update()
rs.Close()
Conn.Close()
MsgBox("OK")

Code 2

Dim Conn As OleDbConnection
Dim Command As OleDbCommand

Conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database.mdb;")

Command = New OleDbCommand("INSERT INTO [Register] ([Username], [Password]) VALUES (?, ?)", Conn)

Command.Parameters.AddWithValue("Username", TxtUsername.Text)
Command.Parameters.AddWithValue("Password", TxtPassword.Text)

Conn.Open()
Command.ExecuteNonQuery()
Conn.Close()
MsgBox("Account Created")

Code 3

Dim Username As String
Dim Password As String

Username = TxtUsername.Text
Password = TxtPassword.Text

Dim Cmd As OleDbCommand
Dim SQL As String
Dim objCmd As New OleDbCommand

Dim Con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database.mdb;")
SQL = "INSERT INTO Register VALUES ('" & Username & "', '" & Password & "')"
Cmd = New OleDbCommand(SQL, Con)

Con.Open()
objCmd = New OleDbCommand(SQL, Con)
objCmd.ExecuteNonQuery()
Con.Close()
MsgBox("Account Created")

All 3 executed with no errors, and MsgBox shows, but no data is inserted