Asp这个老古懂估计没几个人在用了。
几年没写代码了，最近要弄个小东西，给手机端提供json数据，不想麻烦别人，自己又只会asp，没办法就自己动手了。
网上找了好久都没有一个人能完整的把asp操作json说清楚。
最后还是自己搞定的。
整出来共享给大家。
（ps,还有个原因csdn的分不够用啦，大家看着给点吧。
写这个说明文档都用了我两小时。
^_^）以下是示例代码'说明：json.asp中引用了json.js.asp'其他见文档'手机很多时候不认gb2312，跳入json的坑就忘记gb2312吧,讨厌的是，如果代码报错，iis会输出gb2312，结果就是乱码，有点烦。
'自己想办法解决吧response.Charset="utf-8"dimstrJsonData,ovbJson,jdimarrTemp,varname,isetovbJson=newvbJson'asprecrodset和数组转json字符arrTemp=array("a","{""oa"":""我是oa""}","c")strJsonData=ovbjson.toJson(empty,arrTemp,true)'转换为Json格式的字符串，有兴趣可以自己输出看看是什么setj=json.parse(strJsonData)'序列化为json对象（或者是数组对象）response.Write(j.get(1)&"")'别用vb数组来存json对象，不然得每个元素去重新序列化，这里如果想j.get(1).oa就不行了。
必须对j.get(1)单独序列才行'----recrodset就不演示了，懒得连数据库'---自定义操作方法的演示---strJsonData="{a:1,b:[{c:'我是数组中的点c'}]}"setj=json.parsestr(strJsonData)response.Write(j.b.get(0).c&"")'添加节点的时候注意，如果值是null，会被忽然，这个节点会不存在的。
在添加之前记得先检查值setj=json.add(j,"new","我是新加的节点")response.Write(j.new&"")'下面这句注掉了，是因为这个操作是无效的因为j.b是数组，不能add'setj=json.add(j.b,"new1","我是加不进的节点")setj.b=j.b.put(j.b.length,j.b.get(0))response.Write(j.b.get(1).c&",我是新加的数组元素")'因为数组的get方法不允许被赋值，所以不能像下面这样写'setj.b.get(0)=json.add(j.b.get(0),"new","我会报错")json.addj.b.get(0),"new","我是新加的new我不会报错"json.addj.b.get(0),"new1","我是通过变量取出来的哦"response.Write(j.b.get(0).new&"")varname="new1"response.Write(json.byname(j.b.get(0),varname)&"")fori=0toj.b.length-1 varname="c" response.Write(json.byname(j.b.get(i),varname)&"我是循环出来的c，索引："&i&"")next'最后完整的输出给手机就这样：response.Writejson.stringify(j)
几年没写代码了，最近要弄个小东西，给手机端提供json数据，不想麻烦别人，自己又只会asp，没办法就自己动手了。
网上找了好久都没有一个人能完整的把asp操作json说清楚。
最后还是自己搞定的。
整出来共享给大家。
（ps,还有个原因csdn的分不够用啦，大家看着给点吧。
写这个说明文档都用了我两小时。
^_^）以下是示例代码'说明：json.asp中引用了json.js.asp'其他见文档'手机很多时候不认gb2312，跳入json的坑就忘记gb2312吧,讨厌的是，如果代码报错，iis会输出gb2312，结果就是乱码，有点烦。
'自己想办法解决吧response.Charset="utf-8"dimstrJsonData,ovbJson,jdimarrTemp,varname,isetovbJson=newvbJson'asprecrodset和数组转json字符arrTemp=array("a","{""oa"":""我是oa""}","c")strJsonData=ovbjson.toJson(empty,arrTemp,true)'转换为Json格式的字符串，有兴趣可以自己输出看看是什么setj=json.parse(strJsonData)'序列化为json对象（或者是数组对象）response.Write(j.get(1)&"")'别用vb数组来存json对象，不然得每个元素去重新序列化，这里如果想j.get(1).oa就不行了。
必须对j.get(1)单独序列才行'----recrodset就不演示了，懒得连数据库'---自定义操作方法的演示---strJsonData="{a:1,b:[{c:'我是数组中的点c'}]}"setj=json.parsestr(strJsonData)response.Write(j.b.get(0).c&"")'添加节点的时候注意，如果值是null，会被忽然，这个节点会不存在的。
在添加之前记得先检查值setj=json.add(j,"new","我是新加的节点")response.Write(j.new&"")'下面这句注掉了，是因为这个操作是无效的因为j.b是数组，不能add'setj=json.add(j.b,"new1","我是加不进的节点")setj.b=j.b.put(j.b.length,j.b.get(0))response.Write(j.b.get(1).c&",我是新加的数组元素")'因为数组的get方法不允许被赋值，所以不能像下面这样写'setj.b.get(0)=json.add(j.b.get(0),"new","我会报错")json.addj.b.get(0),"new","我是新加的new我不会报错"json.addj.b.get(0),"new1","我是通过变量取出来的哦"response.Write(j.b.get(0).new&"")varname="new1"response.Write(json.byname(j.b.get(0),varname)&"")fori=0toj.b.length-1 varname="c" response.Write(json.byname(j.b.get(i),varname)&"我是循环出来的c，索引："&i&"")next'最后完整的输出给手机就这样：response.Writejson.stringify(j)
2023/12/24 12:28:04
24KB
1
手机端html实现滑动图片轮播完整代码，带透明圆点，找了好多，这是自己根据别人改好的代码，可完美移植至微信公众号，及基于html5开发的app中
2023/12/5 9:23:27
574KB
1
兼容于主流手机浏览器，兼容WP系统手机。
已经经过测试。
限制电脑PC端访问Web页面，只能手机端才能访问
已经经过测试。
限制电脑PC端访问Web页面，只能手机端才能访问
2023/12/3 12:38:49
368B
1
设计了通过AD8232基于stm32的蓝牙无线传输简易心电图检测仪，能够将人体检测到的心电图信息经过AD转换通过蓝牙传输到电脑或者手机端，并可以在电脑端显示心电图波形以及心率情况，系统简易可行，误差较小
2023/12/3 5:14:19
3.67MB
1
色彩识别小车，可以在手机端选定一个特定颜色的物体，小车可以跟随该颜色物体移动。
资料内包含小车控制代码，手机APP安装包，演示代码，器件清单。
资料内包含小车控制代码，手机APP安装包，演示代码，器件清单。
2023/12/3 4:23:18
28.68MB
1
PHP域名销售管理系统网站源码自适应电脑+手机端功能使用简单，不复杂，非常适合个人米表使用，带广告栏安装简单，内附安装教程。
2023/11/24 2:14:32
1004KB
1
在日常工作中，钉钉打卡成了我生活中不可或缺的一部分。然而，有时候这个看似简单的任务却给我带来了不少烦恼。
每天早晚，我总是得牢记打开钉钉应用，点击"工作台"，再找到"考勤打卡"进行签到。有时候因为工作忙碌，会忘记打卡，导致考勤异常，影响当月的工作评价。而且，由于我使用的是苹果手机，有时候系统更新后，钉钉的某些功能会出现异常，使得打卡变得更加麻烦。
另外，我的家人使用的是安卓手机，他们也经常抱怨钉钉打卡的繁琐。尤其是对于那些不太熟悉手机操作的长辈来说，每次打卡都是一次挑战。他们总是担心自己会操作失误，导致打卡失败。
为了解决这些烦恼，我开始思考是否可以通过编写一个全自动化脚本来实现钉钉打卡。经过一段时间的摸索和学习，我终于成功编写出了一个适用于苹果和安卓系统的钉钉打卡脚本。
2024-04-09 15:03
15KB