Vbscript 将数据从两个单独的本地存储位置存储到另一个单独的本地存储位置

Vbscript 将数据从两个单独的本地存储位置存储到另一个单独的本地存储位置,vbscript,nsbasic,Vbscript,Nsbasic,这是一个应用程序。我可以将LocalStorage数据从两个独立的LocalStorage位置存储到另一个独立的LocalStorage位置吗 我遇到的问题是如何使for循环的迭代正确。或者我现在所做的是不可能的。(我是业余爱好编码员) 这就是我想要的 1) RiseFall=-3.822 RiseFallX=3.821 2) RiseFall=-0.617 RiseFallX=0.617 3) RiseFall=0.363 RiseFallX=-0.364 但这就是我得到的 1) RiseFa

这是一个应用程序。我可以将
LocalStorage
数据从两个独立的
LocalStorage
位置存储到另一个独立的
LocalStorage
位置吗

我遇到的问题是如何使
for
循环的迭代正确。或者我现在所做的是不可能的。(我是业余爱好编码员)

这就是我想要的

1) RiseFall=-3.822 RiseFallX=3.821

2) RiseFall=-0.617 RiseFallX=0.617

3) RiseFall=0.363 RiseFallX=-0.364

但这就是我得到的

1) RiseFall=-3.822 RiseFallX=3.821

1) RiseFall=-3.822 RiseFallX=0.617

1) RiseFall=-3.822 RiseFallX=-0.364

2) RiseFall=-0.617 RiseFallX=3.821

2) RiseFall=-0.617 RiseFallX=0.617

2) RiseFall=-0.617 RiseFallX=-0.364

3) RiseFall=0.363 RiseFallX=3.821

3) RiseFall=0.363 RiseFallX=0.617

3) RiseFall=0.363 RiseFallX=-0.364


首先,一个更好的地方是AppStudio讨论板:


我注意到您在一个地方使用
保存[I]。计数
。稍后,使用
保存[u]。计数
。AppStudio BASIC中没有Count或Counts属性。您的意思是
已保存[i].length

以下是将打开的AppStudio讨论的链接:
Dim saves, u
Dim saves, i

saves=JSON.parse(localStorage.BrgDst)

For i=0 To UBound(saves)
If  saves[i].Count Then 
Numb = (saves[i].Count)
RFa =(saves[i].RiseFall)
currentRecord=i  

For u = UBound(saves) To 0 Step -1
If  saves[u].Counts Then
RFb =(saves[u].RiseFallX)
currentRecord=u

Dim saves(), datix

datix={PNB: Numb, MRa: RFa, MRb: RFb}

saves=JSON.parse(localStorage.BrgDst)
saves.push(datix)
localStorage.BrgDst=JSON.stringify(saves)

End If
    Next u 
        End If
           Next i