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)
2023/12/24 12:28:04 24KB asp json
1
动态效果,黑客帝国#include#defineID_TIMER1#defineSTRMAXLEN25//一个显示列的最大长度#defineSTRMINLEN8//一个显示列的最小长度LRESULTCALLBACKWndProc(HWND,UINT,WPARAM,LPARAM);typedefstructtagCharChain//整个当作屏幕的一个显示列,这是个双向列表{structtagCharChain*prev;//链表的前个元素TCHARch;//一个显示列中的一个字符structtagCharChain*next;//链表的后个元素}CharChain,*pCharChain;typedefstructtagCharColumn{CharChain*head,*current,*point;intx,y,iStrLen;//显示列的开始显示的x,y坐标,iStrLen是这个列的长度intiStopTimes,iMustStopTimes;//已经停滞的次数和必须停滞的次数,必须停滞的次数是随机的}CharColumn,*pCharColumn;/***********************/........................................
2023/11/24 9:22:47 9KB 特效C语言
1
最新版NGUI2020.1.5,支持Unity版本5.6.7或更高,官方地址:https://assetstore.unity.com/packages/tools/gui/ngui-next-gen-ui-2413
2023/11/23 20:30:40 12.96MB ngui
1
leetcodepython题解,包含大量leetcode题目的解法,源代码,python实现CourseSchedule21.4.4Numberofislands14.5HeapsMergeKSortedLinkedLists1.5.1KthLargestElementinanArray1.5.2Arrays1.62sum‖l1.62SumⅢ1.6.2ContainsDuplicate1.6.3RotateArray1.643SumSmaller1.653Sumclosest1.663Sum1.6.7TwoSum1.68PlusOne1.6.9BestTimetoBuyandSellStock1.6.10Shortestworddistance1.6.11Movezeroes1.6.12ContainsDuplicate1.6.13MajorityElement1.6.14RemoveDuplicatesfromSortedArray1.6.15NestedListWeightSum1.6.16NestedListWeightedSumIl1.6.17Removeelement1.6.18IntersectionofTwoArraysll1.6.19MergeSortedArrays1.6.20ReverseVowelsofaString1.6.21IntersectionofTwoArrays1.6.22Containerwithmostwater1.6.23ProductofArrayExceptSelf1.6.24TrappingRainWater1.6.25MaximumSubarray1.6.26BestTimetoBuyandSellStockIl1.6.27FindMinimuminRotatedSortedArray1.6.28Pascal'sTriangle1.6.29Pascal'sTriangle‖l1.6.30SummaryRanges1.6.31MissingNumber1.6.32StringsValidAnagram1.7.1Validpalindrome1.7.2WordPattern1.7.3ValidParentheses1.7.4IsomorphicStrings1.7.5ReverseString1.7.6BitManipulationSumofTwoIntegers18.1SingleNumber18.2Singlenumber‖18.3SingleNumberIll1.8.4Maths1.9ReverseInteger1.9.1Palindromenumber19.2Pow(x,n)19.3Subsets1.94Subsets‖195FractiontoRecurringDecimal19.6Excelsheetcolumnnumber19.7Excelsheetcolumntitle19.8FactorialTrailingzeros199HappyNumber1.9.10Countprimes1.9.11Plusone19.12DivideTwoIntegers19.13MultiplyStrings1.9.14MaxPointsonaline1.9.15ProductofArrayExceptSelf19.16Powerofthree19.17IntegerBreak1.9.18Poweroffour9.19Adddigits1.9.20UglyNumber1.9.21glyNumberll1.9.22SuperUglyNumber19.23FindKpairswithsmallestsums1.924SelfCrossing1.9.25Paintfence1.9.26Bulbswitcher19.27Nimgame1.9.28Matrix1.10RotateImage1.10.1SetmatrixZeroes1.10.2Searcha2DMatrix1.10.3Searcha2dMatrixl1.10.4SpiralMatrix1.10.5SpiralMatrix‖l1.10.6DesignLRUCache1.11.1IntroductionMyLeetcodeSolutionsinPythonThisbookwillcontainmysolutionsinPythontotheleetcodeproblems.Currently,willjusttrytoposttheacceptedsolutions.TheplanistoeventuallyincludedetailedexplanationsofeachandeverysolutionamdoingthisjustforfunLinkedListCycleLinkedListCvcleGivenalinkedlist,determineifithasacycleinitFollowup:Canyousolveitwithoutusingextraspace?Url:https://leetcode.com/problems/linked-list-cycle/Definitionforsingly-linkedlistclassListNodeobject)###definit(self,x)self,val=xself,nextNoneclassSolution(object):defhasCycle(self,head)IItypehead:ListNodertype:boolIIIIifhead=nonereturnfalseelsefastheadslow=headWhilefastnoneandfast.nextnonesloW=slownextfastfast.nextnextiffast=slow:breaki千fastNoneorfast.next=nonereturnFalseeliffast=slowreturntruereturnfalseLinkedListCycleReverseLinkedListReverseLinkedlistReverseasinglylinkedlistUrl:https://eetcode.com/problems/reverse-linked-list/definitionforsingly-linkedlist#tclassListNode(object):##def-init(self,x)self.∨al=xselfnextnoneclassSolution(object):defreverseList(self,head)11IIl1typehead:ListNodertype:ListNodeifhead=nonereturnnoneelifhead!=noneandheadnext=nonereturnheadelsetempNonenextnodenoneWhileheadNonenextnodeheadnexthead.nexttemptemp=headheadnextnodereturntempDeletenodeinalinkedlistDeletenodeinalinkedlistWriteafunctiontodeleteanode(exceptthetail)inasinglylinkedlist,givenonlyaccesstothatnodeSupposedthelinkedlistis1->2->3->4andyouaregiventhethirdnodewithvalue3,thelinkedlistshouldbecome1->2->4aftercallingyourfunctionUrl:https://eetcode.com/problems/delete-node-in-a-linked-list/Definitionforsingly-linkedlistclassListNode(object):#def-init(self,x)#self,valxself,nextNoneclasssolution(object):defdeleteNode(self,node):IIlIItypenode:ListNodertype:voidDonotreturnanythingmodifynodein-placeinsteadI111fnode=nonepasse⊥se:nextnodenode.nextnodevalnextnodevalnode.nextnextnode,next
2023/11/8 17:06:47 574KB leetcode python题解
1
:T-Rex:T-雷克斯烟囱样板Unicorn的首选堆栈,用于脚手架Web和Electron的前端应用程序。
页面,资产和组件将在您编辑(热重装)时自动更新。
T-rex堆栈备受关注,并配置了以下语言和框架:入门安装:makeinstall或yarninstall运行:makedevelopment或yarndev打开:立即在ZEIT上部署部署Next.js应用程序的最简单方法是使用创建者提供的。
请查看以获取更多详细信息。
2023/10/17 8:26:02 194KB TypeScript
1
三地址代码是编译原理语法分析后的中间语言的一种,这是我刚完成的三地址代码生成器,符合的语法规则及其语义规则如下(S→ifCthenS1elseS2,这条规则没有加,其余都已完成,也许还有bug,欢迎大家给予指正):产生式 语义规则S→id=E S.code=E.code||gen(id.place’:=’E.place)S→ifCthenS1 C.true=newlabel;C.false=S.next;S1.next=S.next;S.code=C.code||gen(E.true’:’)||S1.codeS→ifCthenS1elseS2 C.true=newlabel;C.false=newlabel;S1.next=S2.next=S.next;S.code=C.code||gen(E.true’:’)||S1.code||gen(‘goto’,S.next)||gen(E.false’:’)||S2.codeS→whileCdoS1 S.begin=newlabel;C.true=newlabel;C.false=S.next;S1.next=S.begin;S.code=gen(S.begin’:’)||C.code||gen(E.true’:’)||S1.code||gen(‘goto’S.begin);C→E1>E2 C.code=E1.code||E2.code||gen(‘if’E1.place’>’E2.place’goto’C.true)||gen(‘goto’C.false)C→E1<E2 C.code=E1.code||E2.code||gen(‘if’E1.place’<’E2.place’goto’C.true)||gen(‘goto’C.false)C→E1=E2 C.code=E1.code||E2.code||gen(‘if’E1.place’=’E2.place’goto’C.true)||gen(‘goto’C.false)E→E1+T E.place=newtemp;E.code=E1.code||T.code||gen(E.place’:=’E1.place’+’T.place)E→E1-T E.place=newtemp;E.code=E1.code||T.code||gen(E.place’:=’E1.place’-’T.place)E→T E.place=T.place;E.code=T.codeT→F T.place=F.place;T.code=F.codeT→T1*F T.place=newtemp;T.code=T1.code||F.code||gen(T.place’:=’T1.place’*’F.place)T→T1/F T.place=newtemp;T.code=T1.code||F.code||gen(T.place’:=’T1.place’/’F.place)F→(E) F.place=E
2023/10/15 21:58:03 3KB 三地址 编译原理 语法分析器
1
2017年5月的新书,pdf版。
BookDescriptionInthissecondedition,youwillgettogripswiththelatestfeaturesofOpenStack.StartingwithanoverviewoftheOpenStackarchitecture,you'llseehowtoadopttheDevOpsstyleofautomationwhiledeployingandoperatinginanOpenStackenvironment.We'llshowyouhowtocreateyourownOpenStackprivatecloud.Thenyou'lllearnaboutvarioushypervisorsandcontainertechnologysupportedbyOpenStack.You'llgetanunderstandingaboutthesegregationofcomputenodesbasedonreliabilityandavailabilityneeds.We'llcovervariousstoragetypesinOpenStackandadvancednetworkingaspectssuchasSDNandNFV.Next,you'llunderstandtheOpenStackinfrastructurefromaclouduserpointofview.Movingon,you'lldeveloptroubleshootingskills,andgetacomprehensiveunderstandingofservicessuchashighavailabilityandfailoverinOpenStack.Finally,youwillgainexperienceofrunningacentralizedloggingserverandmonitoringOpenStackservices.ThebookwillshowyouhowtocarryoutperformancetuningbasedonOpenStackservicelogs.YouwillbeabletomasterOpenStackbenchmarkingandperformancetuning.Bytheendofthebook,you'llbereadytotakestepstodeployandmanageanOpenStackcloudwiththelatestopensourcetechnologies.
2023/10/4 15:22:45 15.29MB openstack
1
解压密码share.weimo.infoFoundationsofModernNetworkingisacomprehensive,unifiedsurveyofmodernnetworkingtechnologyandapplicationsfortoday’sprofessionals,managers,andstudents.Dr.WilliamStallingsoffersclearandwell-organizedcoverageoffivekeytechnologiesthataretransformingnetworks:Software-DefinedNetworks(SDN),NetworkFunctionsVirtualization(NFV),QualityofExperience(QoE),theInternetofThings(IoT),andcloudbasedservices. Dr.Stallingsreviewscurrentnetworkecosystemsandthechallengestheyface–fromBigDataandmobilitytosecurityandcomplexity.Next,heofferscomplete,self-containedcoverageofeachnewsetoftechnologies:howtheywork,howtheyarearchitected,andhowtheycanbeappliedtosolverealproblems.Dr.Stallingspresentsachapter-lengthanalysisofemergingsecurityissuesinmodernnetworks.Heconcludeswithanup-todatediscussionofnetworkingcareers,includingimportantrecentchangesinrolesandskillrequirements. Coverage: ,解压密码share.weimo.info
2023/10/2 9:24:29 21.47MB 英文
1
ArcGis9.2的破解文件1.如果你已经装了ArcGIS9.2,请先卸载9.1再装9.2版本.2.安装LicenseMangera)用记事本打开Crack文件下的license.lic,把第一句话中的this_host替换为你的机器名.(机器名应该知道吧?我的电脑右击->属性->计算机名.注意不要用中文)b)安装LicenseManger,选择"Ireceivedthelicensebyemail..."然后单击browse,c)选择Crack目录下的license.lic单击next,完成安装,重起机器.d)拷贝Crack下的license.lic和ARCGIS.EXE到C:\ProgramFiles\ESRI\License\arcgis9x,也就是安装好的LicenseManger所在的文件夹e)开始->ArcGIS->LicenseManager(9.x)->RunLicenseManagerTools.f)单击“ConfigurationusingServices”,选择"ArgGISlicenseserver"g)然后单击ConfigureServices选项卡,设置Pathtothelicensefile:(例如c:\programfiles\esri\license\arcgis9x\license.lic)h)单击SaveServicei)启动服务:Startserver,Rereadlicensefile,如果出现RereadServerLicenseFileCompleted就ok了,不行的话就:Stopserver->Startserver->Rereadlicensefile多试几次j)双击Crack下的ESRIFloat.reg,加入注册表.(这一步一定不能少)k)检验是否成功安装授权文件方法:单击ServerDiagnostic选项卡,单击PerformDiagnostic等待运行完毕如果看到Thislicensecanbecheckedout说明OK了.l)再安装ArcGISDesktop9.2DVD里的任何软件,随你便了.
2023/9/11 18:22:52 932KB ArcGis9.2 破解
1
React下一个样板里面有什么?支持以使自动化组件创建结构,看到更多的细节依存关系节点js=>v10启动并运行安装依赖项yarn(ornpmi)运行yarndev(ornpmdev)以运行下一个开发服务器(它将在http://localhost:3000运行yarnstorybook来运行storybook开发服务器(它将在http://localhost:6006)运行yarngenerate[ComponentName]以自动创建一个新的组件结构(结果将在src/components/[ComponentName])可用脚本yarn
2023/9/4 12:37:17 299KB typescript pwa eslint styled-components
1
共 80 条记录 首页 上一页 下一页 尾页
在日常工作中,钉钉打卡成了我生活中不可或缺的一部分。然而,有时候这个看似简单的任务却给我带来了不少烦恼。 每天早晚,我总是得牢记打开钉钉应用,点击"工作台",再找到"考勤打卡"进行签到。有时候因为工作忙碌,会忘记打卡,导致考勤异常,影响当月的工作评价。而且,由于我使用的是苹果手机,有时候系统更新后,钉钉的某些功能会出现异常,使得打卡变得更加麻烦。 另外,我的家人使用的是安卓手机,他们也经常抱怨钉钉打卡的繁琐。尤其是对于那些不太熟悉手机操作的长辈来说,每次打卡都是一次挑战。他们总是担心自己会操作失误,导致打卡失败。 为了解决这些烦恼,我开始思考是否可以通过编写一个全自动化脚本来实现钉钉打卡。经过一段时间的摸索和学习,我终于成功编写出了一个适用于苹果和安卓系统的钉钉打卡脚本。
2024-04-09 15:03 15KB 钉钉 钉钉打卡