Lowyat.NET: Latest topics by aMaZinG

WTS Razer Hammerhead Pro (Earphone + Mic)

aMaZinG — Sat, 30 Aug 2014 13:51:58 +0800

Item(s): Razer Hammerhead Pro (Earphone + Microphone)

Package includes:

Price: RM150.00

Warranty:

Dealing method: COD / Postage (Bank-in)

Location of seller: Cheras @ Setapak, KL

Contact method/details: Whatsapp/Call 019-3366258

Age of item: 1 month

---

Item(s) conditions: Excellent (10/10)

Picture:

Reason for sale: I have another gaming gear, SteelSeries Siberia

WTS iPhone 5S 16Gb Space Gray

aMaZinG — Mon, 30 Jun 2014 18:30:09 +0800

Item(s): iPhone 5S 16Gb Space Gray

Package includes: Box, earphone, usb cable and charger

Price: RM1,800.00

Warranty:

Dealing method: COD Cheras

Location of seller: Cheras, KL

Contact method/details: WhatsApp 0193366258

Age of item: 7 months, bought on December 2013

---

Item(s) conditions: Good , abit stratch at the on/off button

Picture:

Reason for sale:

UsedIphone 5s 16gb

aMaZinG — Thu, 26 Jun 2014 09:53:31 +0800

I would like to let go my iphone 5s 16gb.
Bought on December 2013. Condition is good.
How much is the price for used 5s? Reason to sell bcoz i need money and i hv iphone 5 16gb

sql

aMaZinG — Tue, 24 Jun 2014 10:29:27 +0800

Hi, i were provided 10k number of customers id. From this customer id, i want to get the customers
who performed transaction X among of those that had done transactions Y or Z.
Thus, i came up with 2 types of sql query but both gv me different results

1)
select distinct customerid from transaction where transtype = 'X' and customerid in (<the list of 10k customers>) and exist (select distinct customerid from transaction where transtype in ('Y','Z') and customerid in (<the list of 10k customers>) )
result:: 9 customers

2)
a. select distinct customerid froM Transaction where transtype in ('Y','Z') and customerid in (<list of 10k customer id)
result:: 21 customers

from these 21 customers, i make another select query to get record X
b.select distinct customerid from transaction where transtype = 'X' and customerid in (<list of customers id from result 2.a>)
result:: 3 customers

Can u guys help me to check why got 2 different results here, but i prefer query 1) since i need to get records weekly by scheduling it at Windows Task Scheduler

Thanks.

php: update text field values into DB

aMaZinG — Tue, 22 Apr 2014 12:59:31 +0800

hi, how can i update text field values into DB? i want to update mobileNo based on no_pendaftaran & no_kp.
Attached is the full source code... pls help
The problem is when i submit the form, it only update the last value only.. not all the values. myabe i should use array.. but i keep getting errors...

for ($x=0;)$x<$bil;$x++ {
$query = "UPDATE ownerInfo set mobileNo = '$mobileNo' where no_pendaftaran = '$no_pendaftaran' and no_kp = '$ownerIcNo'";
}

db2 sql script create txt file name

aMaZinG — Mon, 14 Apr 2014 13:25:33 +0800

hi, can help me with the sql script to output data into text file
i would like to generate the text file and name it to TRANSACTIONS_<extraction date>_<total records>.txt

export to C:\temp\TRANSACTION_20140101_4023.txt of del
modified by coldel| nochardel
select * from (
select A.USERID, B.ICNO, A.ACCOUNTNO, A.REFERENCENUMBER, A.TYPE, B.BRANCHCODE, B.STATUS,
varchar_format(TRXTIMESTAMP,'MM/DD/YYYY HH:MM') AS TIME,to_char(A.AMOUNT)
FROM TABLE1 AS A, TABLE2 AS B
WHERE A.USERID=B.USERID AND TRXTIMESTAMP >= '2014-01-01' AND TRXTIMESTAMP < '2014-02-01')

php - soaprequest curl

aMaZinG — Sun, 13 Apr 2014 13:21:14 +0800

Hi, i need to send soap request listOwner in array but i hv no idea how to do it
The listOwner parameter that i hv to send is OwnerName, IcNo & phoneNo

$SOAPrequest="<soapenv:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soapenv=\"http://schemas.xmlsoap.org/soap/envelope/\" xmlns:ser=\"http://servlet.web.webis.ssm.com\" xmlns:soapenc=\"http://schemas.xmlsoap.org/soap/encoding/\">
<soapenv:Header/>
<soapenv:Body>
<ser:renewBusinessNew soapenv:encodingStyle=\"http://schemas.xmlsoap.org/soap/encoding/\">
<param xsi:type=\"urn:BusinessRenewalReq\" xmlns:urn=\"urn:SsmBase\">
<agencyBranchCode xsi:type=\"soapenc:string\">${agencyBranchCode}</agencyBranchCode>
<agencyId xsi:type=\"soapenc:string\">${agencyID}</agencyId>
<allAmount xsi:type=\"xsd:double\">${total}</allAmount>
<brNo xsi:type=\"soapenc:string\">${brNo}</brNo>
<branchCode xsi:type=\"soapenc:string\">${branchCode}</branchCode>
<checkDigit xsi:type=\"soapenc:string\">${chkDigit}</checkDigit>
<chractive xsi:type=\"soapenc:string\"></chractive>
<chraddresschange xsi:type=\"soapenc:string\"></chraddresschange>
<chramendment xsi:type=\"soapenc:string\"></chramendment>
<chrbranchchange xsi:type=\"soapenc:string\"></chrbranchchange>
<chrbusinesstypechange xsi:type=\"soapenc:string\"></chrbusinesstypechange>
<chrownershipchange xsi:type=\"soapenc:string\"></chrownershipchange>
<chrregistered xsi:type=\"soapenc:string\"></chrregistered>
<cmpAmount xsi:type=\"xsd:double\">${cmpAmount}</cmpAmount>
<counterNo xsi:type=\"soapenc:string\">${counterNo}</counterNo>
<listOwner xsi:type=\"bus:ArrayOf_tns2_BusinessOwnerInfo\" soapenc:arrayType=\"par:BusinessOwnerInfo[]\" xmlns:bus=\"http://192.168.3.41/services/BusinessService\" xmlns:par=\"http://param.webis.ssm.com\"/>
<numberofYears xsi:type=\"xsd:int\">${noOfYears}</numberofYears>
<payerName xsi:type=\"soapenc:string\">${payerName}</payerName>
<payerPhoneNumber xsi:type=\"soapenc:string\">${phoneNo}</payerPhoneNumber>
<reqDate xsi:type=\"xsd:dateTime\">${cdate}</reqDate>
<reqRefNo xsi:type=\"soapenc:string\">${refNo}</reqRefNo>
</param>
</ser:renewBusinessNew>
</soapenv:Body>
</soapenv:Envelope>";

$ch = curl_init();
curl_setopt($ch, CURLOPT_HTTPHEADER, array('SOAPAction:foo '));
curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
curl_setopt($ch, CURLOPT_URL, "http://192.168.3.41/services/BusinessService?wsdl");
curl_setopt($ch, CURLOPT_POSTFIELDS, $SOAPrequest);

$sXML = curl_exec($ch);
$fXML = htmlentities($sXML);

$p = xml_parser_create();
xml_parse_into_struct($p, $sXML, $vals, $index );
xml_parser_free($p);

php - open new window

aMaZinG — Sat, 12 Apr 2014 13:50:17 +0800

Hi, in the new php page.. i hv to send soaprequest. so, there is 2 option but both returned error
Your help is much appreciated

1) open a new window by moving the mouse pointer to the link. but the problem is, the soaprequest is not working.

page1.php
<a href="javascript:;" onmouseover="MM_openBrWindow(page2.php?BRNO=$br_no&REQREFNO=$refNo','template','width=950,height=450,scrollbars=no')">Go To Page 2</a>

page2.php
$SOAPrequest="<soapenv:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soapenv=\"http://schemas.xmlsoap.org/soap/envelope/\" xmlns:ser=\"http://servlet.web.webis.ssm.com\">
<soapenv:Header/>
<soapenv:Body>
<ser:findBusinessByBrNo soapenv:encodingStyle=\"http://schemas.xmlsoap.org/soap/encoding/\">
<param xsi:type=\"urn:FindBusinessByBrNoReq\" xmlns:urn=\"urn:SsmBase\">
<agencyId xsi:type=\"soapenc:string\" xmlns:soapenc=\"http://schemas.xmlsoap.org/soap/encoding/\">${agencyID}</agencyId>
<brNo xsi:type=\"soapenc:string\" xmlns:soapenc=\"http://schemas.xmlsoap.org/soap/encoding/\">${br_no}</brNo>
<reqDate xsi:type=\"xsd:dateTime\">${cdate}</reqDate>
<reqRefNo xsi:type=\"soapenc:string\" xmlns:soapenc=\"http://schemas.xmlsoap.org/soap/encoding/\">${refNo}</reqRefNo>
</param>
</ser:findBusinessByBrNo>
</soapenv:Body>
</soapenv:Envelope>";

$ch = curl_init();
curl_setopt($ch, CURLOPT_HTTPHEADER, array('SOAPAction:foo '));
curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
curl_setopt($ch, CURLOPT_URL, "http://192.168.3.41/services/BusinessService?wsdl");
curl_setopt($ch, CURLOPT_POSTFIELDS, $SOAPrequest);

$sXML = curl_exec($ch);
$fXML = htmlentities($sXML);

$p = xml_parser_create();
xml_parse_into_struct($p, $sXML, $vals, $index );
xml_parser_free($p);

2) open a new window by clicking the link to the page2.php..but i encountered error at page1.php. The error is as below
Parse error: syntax error, unexpected T_STRING, expecting ',' or ';' in C:\AppServ\www\system1\page1.php on line 422

The error lead me to <?php echo "<a title=\"klik disini\" href=\"page2.php?BRNO=$br_no&REQREFNO=$refNo\"target="_BLANK"/>Go To Page 2</a>";?>

Find b2b massage in betong thai

aMaZinG — Thu, 09 Jan 2014 22:17:36 +0800

Hi \k

Im at betong thai. Where to find b2b massage parlour?

WTS Original iPhone 5 accessories

aMaZinG — Wed, 01 Jan 2014 20:51:22 +0800

Item(s):Original iPhone 5's lightning cable charger earphone
Package includes:

Price: Lightning cable RM50, Charger RM50, earphone RM90

Warranty:

Dealing method: COD Klang Valley, online banking and free postage

Location of seller: Cheras, KL

Contact method/details: Call 0193366258 Whatsapp 0133750825

Age of item: 1 month

---

Item(s) conditions: excellent

Picture: yes

Reason for sale: iPhone 5 stolen

Gif

aMaZinG — Sun, 17 Nov 2013 11:09:57 +0800

Hi, last time i able to view moving pictures in android..sent by friends in wechat. Now, whenever i download gif format image at the internet, and view in ip5.. the pictures are not moving. Im not so sure what kind of image format sent by friends...but the images are moving/not static. Any idea why?

No one want to answer or not clear with my question? Can you save this gif in the phone and view it? http://i.imgur.com/GAe7YhN.gif

lost iphone5

Thu, 01 Jan 1970 07:30:00 +0800

lost iphone5

aMaZinG — Sun, 27 Oct 2013 19:16:09 +0800

i lost my iphone5... i've made a police report. i tried to call my phone but the phone is turned off. is it possible to track my phone? i didnt install Find My iPhone app... but i have signed icloud. if the phone is on and connected to wifi/internet but using other number/sim card,
is it possible to track the phone location or lock/block the phone from being used? yesterday i went to Mac Store near lowyat plaza but the staff said it is not possible to do so. it is very disappointed if iphone5 doesnt have that function.
please advice.

thank you.

application developer at bank simpanan nasional

aMaZinG — Thu, 19 Jan 2012 21:16:59 +0800

hello.. anyone know what is the job scope of application developer at bank simpanan nasional (bsn). what kind of programming language, os, dtbase, comp. system, etc they r using? thanks in advance.

neo cps gearbox transmisson conversion

aMaZinG — Sat, 13 Aug 2011 06:32:40 +0800

hi guys, i'm looking for a satria neo cps owner who is willing to trade his/her manual gearbox transmission with my automatic gearbox transmission. The labour and swapping charges are fully supported by me that usually will costs u around rm1k. !! just park your car at workshop.. and everything will be done for u. for more details please call 013-3750825 firdaus

here is the details of my car
model: satria neo cps a/t
year: 2010
current mileage: 22xxx km
my car has never involved in any accident.. no gearbox issues. tip top condition.. like new

Vb6+SQL Server 2008: Incorrect syntax

aMaZinG — Thu, 12 May 2011 18:07:02 +0800

hi guys
im developing an application using vb6 and sql server 2008 r2(free edition). please help me with this error: [Microsoft][ODBC SQL Server Driver][SQL Server] Incorrect syntax near '5' . i think this has to do with INSERT statement because once i enter data, then this error pop out. for your information, im connecting to the sql server 2008 using DSN and this DSN points to a computer which installed SQL Server 2008. the DNS is ok and able to connect to sql server.
p/s: this source code has no error if i use ms access as the database

error message

[Microsoft][ODBC SQL Server Driver][SQL Server] Incorrect syntax near '5'

here is the source code for connection string:

Public Function IsOpenConnectionOK() As Boolean
Set gADOConn = New ADODB.Connection

gADOConn = "PROVIDER=MSDASQL;" + _
"DSN=DSN_VBSTENTAERP;" + _
"ConnectionTimeout = 0;" + _
"CommandTimeout = 0;" + _
"UID=firdaus;" + _
"PWD=firdaus1923"

On Error GoTo ErrHandler
gADOConn.Open
IsOpenConnectionOK = True
Exit Function

ErrHandler:
MsgBox gADOConn.Errors(0).Description
IsOpenConnectionOK = False

End Function

here is the source code where the error encountered when insert data into database

Private Sub cmdSave_Click()

If Len(txtCustomerCode.Text) < 1 Or Len(txtCustomerCode.Text) < 1 Then
MsgBox "Please Enter Customer Code"
Exit Sub
End If

If IsCustomerCodeAlreadyInDatabase() Then
MsgBox "Customer Already Exist In Database"
Exit Sub
End If

If IsUpdateCustomerSuccessful() Then
MsgBox "New Customer Has Been Successfully Added", vbInformation, "Update Completed"
Call ClrScr
Call InitCustomerList
txtCustomerCode.SetFocus
Else
MsgBox "Please Review Log File For Detail Of Error Message", vbCritical, "Update Failed"
End If

End Sub

Private Function IsCustomerCodeAlreadyInDatabase() As Boolean
IsCustomerCodeAlreadyInDatabase = False

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

Dim itmX As ListItem

gszsqlstatement = "SELECT * From tblCustomer where CustomerCode = '" + txtCustomerCode.Text + "' OR CustomerName = '" + txtCustomerName.Text + "'"

With rs
.CursorLocation = adUseServer
.CursorType = adOpenForwardOnly
.LockType = adLockReadOnly
.Open gszsqlstatement, gADOConn, , , adCmdText
If Not .EOF Then
IsCustomerCodeAlreadyInDatabase = True
End If
.Close
End With
Set rs = Nothing

End Function

Private Function IsUpdateCustomerSuccessful() As Boolean
IsUpdateCustomerSuccessful = False

On Error GoTo ErrHandler

gszsqlstatement = "INSERT INTO tblCustomer (CustomerCode, CustomerName,CustomerType,CustomerDOName,DOStreet1,DOStreet2," + _
"DOCity,DOState,DOCountry,CustomerInvName,InvStreet1,InvStreet2,InvCity,InvState,InvCountry,CustWebsite,ActiveCustomer," + _
"PersonInCharge,OffTelNo,FaxTelNo) VALUES ('" + txtCustomerCode.Text + "', '" + txtCustomerName.Text + "','" + cboCustomerType.Text + "'" + _
",'" + txtCustDeliveryName.Text + "','" + txtDOStreet1.Text + "','" + txtDOStreet2.Text + "'," + _
"'" + txtDOCity.Text + "','" + txtDOState.Text + "','" + cboDOCountry.Text + "','" + txtCustInvoiceName.Text + "'" + _
" ,'" + txtInStreet1.Text + "','" + txtInStreet2.Text + "','" + txtInCity.Text + "','" + txtInState.Text + "'" + _
" ,'" + cboInCountry.Text + "','" + txtWebSite.Text + "','" + cboActiveCust.Text + "','" + txtPerInCharge.Text + "'" + _
" ,'" + txtGeneralOffNo.Text + "','" + txtGeneralFaxNo.Text + "')"

gADOConn.BeginTrans
gADOConn.Execute gszsqlstatement, , adExecuteNoRecords
gADOConn.CommitTrans

IsUpdateCustomerSuccessful = True

Exit Function

ErrHandler:
gADOConn.RollbackTrans
Call LogErrors("frmAddCustomer.IsUpdateCust...", gADOConn.Errors(0).Number, gADOConn.Errors(0).Description)
MsgBox "Error Encountered While Saving. Please Review Logi File", vbCritical, "Error"

End Function

please help me out. thanks in advance

Looking for a room to rent @ Cengal Condominium

aMaZinG — Wed, 08 Dec 2010 12:21:42 +0800

Male, malay & muslim housemates only. Call firdaus 0133750825

VB6 ip address problem

aMaZinG — Thu, 28 Oct 2010 12:03:16 +0800

hi. pls help me about this vb6 code. i want to add static ip address, username, pc login name, username, department and empid into MS Access Database. the problem is i cant store the data into the access database.(the msgbox MsgBox "The data has been saved", vbInformation, "Data Saved") not appear. i think this maybe because of the ipaddress datatype which is suitable with the column. fyi, this form name is frmAddIPAddress automatically get the static ip address once the form activated.

Table name: tblIPAddress
Columns: userIPAdd, User, Dept, EmpID, PCName, LoginName .. all the datatypes are Text.

Private Sub getIPAddress()
txtIPAddress.Caption = Winsock1.LocalIP
End Sub
Public Sub NextDlgCtrl(ByRef KeyAscii As Integer)

If KeyAscii = vbKeyReturn Then
SendKeys "{tab}"
KeyAscii = 0
Else
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End If

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
Call NextDlgCtrl(KeyAscii)
End Sub

Private Sub Form_Activate()
Static bLoaded As Boolean
If Not bLoaded Then
bLoaded = True
Call initDept
Call getIPAddress
End If

End Sub

Private Sub initDept()

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Dim itmX As ListItem

gszSQLStatement = "SELECT distinct StaffDept FROM tblLogin "

cboDept.Clear

With rs
.CursorLocation = adUseServer
.CursorType = adOpenForwardOnly
.LockType = adLockReadOnly
.Open gszSQLStatement, gADOConn, , , adCmdText

Do Until .EOF
cboDept.AddItem !StaffDept & ""
.MoveNext
Loop

.Close
End With
Set rs = Nothing

End Sub

Private Sub cmdCancel_Click()
Unload Me
End Sub

Private Sub cmdSave_Click()
If IsValidUser() Then
If IsValidDept() Then
Call SaveIPAddress
MsgBox "The data has been saved", vbInformation, "Data Saved"
Call ClrScr
End If
End If

End Sub

Private Function IsValidUser() As Boolean

IsValidUser = False
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Dim tempUser As String
Dim tempPCName As String
Dim tempUserIPAdd As String
Dim tempEmpID As String
Dim tempDept As String
Dim tempLoginName As String

gszSQLStatement = "SELECT * FROM tblIPAddress WHERE User = '" + txtUser.Text + "' "

With rs
.CursorLocation = adUseServer
.CursorType = adOpenStatic
.LockType = adLockReadOnly
.Open gszSQLStatement, gADOConn, , , adCmdText

Do Until .EOF
tempUser = !User & ""
tempUserIPAdd = !userIPAdd & ""
tempPCName = !PCName & ""
tempEmpID = !EmpID & ""
tempDept = !Dept & ""
tempLoginName = !LoginName & ""

If tempUser = "" Then
IsValidUser = True
Else
MsgBox " '" + tempUser + "': No duplicate user allowed", vbCritical + vbOKOnly, "Error"
txtUser.SetFocus
Call ClrScr
Exit Function
End If
Loop
.Close
End With
Set rs = Nothing

End Function

Private Function IsValidDept() As Boolean
IsValidDept = False

If cboDept.Text <> "" Then
IsValidDept = True
Else
MsgBox "Please choose your department", vbCritical, "Error"
cboDept.SetFocus
End If

End Function

Private Function SaveIPAddress() As Boolean

SaveIPAddress = False
On Error GoTo ErrHandler

gszSQLStatement = "INSERT INTO tblIPAddress (userIPAdd,User,Dept,EmpID,PCName,LoginName) " + _
"VALUES ('" + CStr(txtIPAddress.Caption) + "', '" + txtUser.Text + "' , '" + cboDept.Text + "' , '" + txtEmpID.Text + "' , '" + txtPCName.Text + "' , '" + txtLoginName.Text + "')"

gADOConn.BeginTrans
gADOConn.Execute gszSQLStatement, , adExecuteNoRecords
gADOConn.CommitTrans

SaveIPAddress = True
Exit Function

ErrHandler:
gADOConn.RollbackTrans
Call LogErrors("frmAddIPAddress.SaveIPAddress", gADOConn.Errors(0).Number, gADOConn.Errors(0).Description)

End Function

Private Sub ClrScr()
txtPCName.Text = ""
cboDept.Text = ""
txtUser.Text = ""
txtEmpID.Text = ""
txtLoginName.Text = ""
End Sub

Private Sub Form_Unload(Cancel As Integer)
Set frmAddIPAddress = Nothing
End Sub

exhaust sound too loud

aMaZinG — Fri, 08 Oct 2010 23:18:44 +0800

hi, i've just installed 4-2-1 galvanised extractor with unknown piping s-flow(i think stock), and midbullet and muffler. all cost rm600. the fuel consumption is good..better than before and there's a only a bit power i can feel at 3k-5k rpm(i'm not sure..mybe just my feeling). my problem is..the exhaust is too loud especially at the backseat. how to make the sound quieter without reducing the power? i think the loud sound has to do with the muffler. please advice me..and suggest what i suppose to do.

CIMB

aMaZinG — Sat, 28 Aug 2010 18:48:33 +0800

hi i got an interview with CIMB on next week for the position of it developer/programmer. so, i hope anyone here who has interview experience with CIMB or work at CIMB can give me some advices. thanks.
FYI, i'm a fresh grad.