probleum in inserting empty records

[veer]

Hi
i have a mdb table in which i want to access the data from mdb table into new table i,e Operator but the condition is if the data in first row of column say "operator_code" is "alfred" . The name alfred is inserted into operator
OK
and when i move to the next row in the column i,e "operator_code"
lets assume it is empty in that case the value of previous row i,e "alfred" must be inserted into the empty row
i create a loop but it is not working for empty record

For reccount = 1 To rsmaster.RecordCount
If Not IsNull rsmaster.Fields("Yp1VOp") Then
YpVcode = rsmaster.Fields("Yp1VOp")
squery = "insert into operator values( ' " & YpVcode & " ' )"
dbmaster.Execute (squery)
Else
squery = "insert into operator values( ' " & YpVcode & " ' )"
dbmaster.Execute (squery)
 
End If
rsmaster.MoveNext
Next

please give me help
best regards
varinder

[debasisdas]

Once you move to tthe next record how it will access the previous record. You need to store the previous record in a variable and check the next rerord. Continue this is a loop till the last record.

[veer]

Hi
i stored the value in a variable named "YpvCode"
and i used this condition

For reccount = 1 To rsmaster.RecordCount
If rsmaster.Fields("Yp1VOp") <> "" Then
YpVcode = rsmaster.Fields("Yp1VOp")
squery = "insert into operator values( ' " & YpVcode & " ' )"
dbmaster.Execute (squery)
Else
squery = "insert into operator values( ' " & YpVcode & " ' )"
dbmaster.Execute (squery)
End If
rsmaster.MoveNext
Next

but when the empty record came, the control is not moving on to else condition
how is it possible
please check the condition and give me suggestion

Once you move to tthe next record how it will access the previous record. You need to store the previous record in a variable and check the next rerord. Continue this is a loop till the last record.

[debasisdas]

Check if the record is empty or contains spaces.

[veer]

Hi
the record is empty there is not space because
i am accessing mdb file
the first row of column contain data"alfred"
the 2nd row of column is empty and i want the data from first row of that column in 2nd row of column

Check if the record is empty or contains spaces.

[debasisdas]

Have you tried as suggested in post #2.

[veer]

yes i tried it

For icount =1 to rsmaster.recordcount
If rsmaster.Fields("Yp1VOp") <> "" Then
YpVcode = rsmaster.Fields("Yp1VOp") \\stored value in ypvcode
squery = "insert into operator values( ' " & YpVcode & " ' )
dbmaster.Execute (squery)
Else
squery = "insert into operator values( ' " & YpVcode & " ' )"
dbmaster.Execute (squery)
End If
rsmaster.MoveNext
Next

In next step the field is empty i want the value from YpVCode in the empty field
but when the empty field came it is not following
rsmaster.Fields("Yp1VOp") <> "" condtion but i want it jump and directly goto else condition

Have you tried as suggested in post #2.

[debasisdas]

try like this

YpVcode= iif(isnull(rsmaster.Fields("Yp1VOp")),null,rsmaste r.Fields("Yp1VOp"))


and since you are eecuting the same code why using IF....ELSE