Question about RTO Amcells Total Body Physican Digital Scale

Your logic board needs aligning of needs replacing.

Aug 07, 2012 | Exercise & Fitness

Hi there:

Manual says Error1 is a damaged or dirty CD. Suggests reinserting. If that doesn't work, it suggests returning to the dealer.

Hope this helps.

Manual says Error1 is a damaged or dirty CD. Suggests reinserting. If that doesn't work, it suggests returning to the dealer.

Hope this helps.

May 21, 2012 | Cars & Trucks

Tape jam or battery low. Please clean the printer and/or exchange the batteries.

Aug 20, 2011 | Dymo LetraTag QX50 Thermal Label Printer

Your network might block Gtalk service, try to use web messenger http://karoolark.com/#gtalk

Jul 07, 2011 | Google Talk

Error 1 indicates a tape jam or low battery. To resolve, try removing
the cassette and clearing the tape or replacing the battery.

Aug 20, 2010 | Dymo LetraTAG Thermal Label Printer

Error 01 means that communication between camera and lens is faulty. Try to clean lens contacts.

May 25, 2010 | Canon EF-S 18-55mm f/3.5-5.6 USN Lens

network error1

Whis server? while connecting with what

Whis server? while connecting with what

Oct 13, 2009 | Labtec 961307-0914 Webcam

Is it with all cds? Also what is the make & model this would help in tracking down your error code

Aug 06, 2009 | Car Audio & Video

Here is one solution. You might consider adding more robust error handling.

if the decimal numbers passed to the div function are multiples i will be a non-zero number of that multiple otherwise i will be zero.

Dim i As Integer

i = div(12, 0)

If i = 0 Then

'not multiple

' do this

Else

' is multiple

' do something else

End If

Function div(ByVal numerator As Object, ByVal denominator As Object) As Integer

dim n , d decimal

Dim result As Decimal

Dim remainder As Decimal

If IsNumber(numerator) Is True _

And IsNumber(denominator) Is True Then

If numerator <> 0 Then

n = numerator

d = denominator

Else

GoTo error1

End If

Else

GoTo error1

End If

result = Decimal.divide(n, d)

remainder = Decimal.remainder(n, d)

If remainder = 0 Then

div = result

Else

div = 0

End If

Exit Function

error1:

msgbox("Numbers must be non-zero numerics", , "Multiple check error")

div = 0

End Function

End Function

if the decimal numbers passed to the div function are multiples i will be a non-zero number of that multiple otherwise i will be zero.

Dim i As Integer

i = div(12, 0)

If i = 0 Then

'not multiple

' do this

Else

' is multiple

' do something else

End If

Function div(ByVal numerator As Object, ByVal denominator As Object) As Integer

dim n , d decimal

Dim result As Decimal

Dim remainder As Decimal

If IsNumber(numerator) Is True _

And IsNumber(denominator) Is True Then

If numerator <> 0 Then

n = numerator

d = denominator

Else

GoTo error1

End If

Else

GoTo error1

End If

result = Decimal.divide(n, d)

remainder = Decimal.remainder(n, d)

If remainder = 0 Then

div = result

Else

div = 0

End If

Exit Function

error1:

msgbox("Numbers must be non-zero numerics", , "Multiple check error")

div = 0

End Function

End Function

Aug 06, 2008 | Computers & Internet

26 people viewed this question

Usually answered in minutes!

×