Vbscript 对象不支持此属性或方法document.getElementById().Value

Vbscript 对象不支持此属性或方法document.getElementById().Value,vbscript,Vbscript,我正在尝试运行VBS,但不断出现错误 对象不支持此属性或方法document.getElementById.Value 尝试将我的IE设置重置为默认设置,并使用其他版本的IE,但仍然面临相同的问题 下面是脚本的详细信息 strAssets=Assets.txt strOutput=AssetWarranties.csv strSite=https://selfsolve.apple.com/agreementWarrantyDynamic.do 设置objFSO=CreateObjectScr

我正在尝试运行VBS,但不断出现错误

对象不支持此属性或方法document.getElementById.Value 尝试将我的IE设置重置为默认设置,并使用其他版本的IE,但仍然面临相同的问题

下面是脚本的详细信息

strAssets=Assets.txt strOutput=AssetWarranties.csv strSite=https://selfsolve.apple.com/agreementWarrantyDynamic.do 设置objFSO=CreateObjectScripting.FileSystemObject 常数intForReading=1 设置objInput=objFSO.OpenTextFilestrAssets,intForReading,False 设置objOutput=objFSO.CreateTextFilestrOutput,True objOutput.WriteLine串行,状态,电话支持,到期,硬件支持,到期 而不是objInput.AtEndOfStream strImei=TrimobjInput.ReadLine 如果是斯特里梅那么 设置objFF=CreateObjectInternetExplorer.Application objFF.Visible=True objFF.导航strSite objFF.ReadyState 4或objFF.Busy时 WScript.Sleep 100 温德 objFF.document.GetElementByIDSerialNumber检查。值=strImei objFF.document.getElementById保修复选按钮。点击 而InStrobjFF.Document.body.InnerHTML,=0和_ InStrobjFF.Document.body.InnerHTML,=0和_ InStrobjFF.Document.body.InnerHTML,序列号无效=0 WScript.Sleep 100 温德 strPageText=objFF.Document.body.InnerHTML objFF,退出 如果InStrstrPageText,序列号无效>0,则 'WScript.Echo序列号无效 objOutput.WriteLine&strImei&,序列号无效 其他的 strDetail=&strImei& 如果InStrstrPageText>0,则 'WScript.Echo有效购买日期 strDetail=strDetail&,有效购买日期 其他的 'WScript.Echo未验证购买日期 strDetail=strDetail&,未验证购买日期 如果结束 如果InStrstrPageText>0,则 'WScript.Echo电话技术支持:活动 strDetail=strDetail&电话技术支持:激活 intPos=instrinstrpagetext,strPageText,预计到期日期: 如果intPos>0,则 STRExpatition=MidstrPageText、intPos、InStrintPos、strPageText、

-intPos 'WScript.Echo strexption strDetail=strDetail&、&strexport& 其他的 'WScript.Echo估计的过期日期:未知 strDetail=strDetail&,预计到期日期:未知 如果结束 其他的 'WScript.Echo电话技术支持:过期 strDetail=strDetail&电话技术支持:过期 如果结束 如果InStrstrPageText>0,则 'WScript.Echo修复和服务覆盖率:活动 strDetail=strDetail,维修和服务范围:活动 intPos=instrinstrpagetext,strPageText,预计到期日期: 如果intPos>0,则 STRExpatition=MidstrPageText,intPos,InStrintPos,strPageText,-intPos 'WScript.Echo strexption strDetail=strDetail&、&strexport& 其他的 'WScript.Echo估计的过期日期:未知 strDetail=strDetail&,预计到期日期:未知 如果结束 其他的 'WScript.Echo修复和服务覆盖率:未激活 strDetail=strDetail&,维修和服务范围:未激活 如果结束 objOutput.WriteLine strDetail 如果结束 如果结束 温德 objInput,关闭 对象输出。关闭 WScript.Echo已完成您应该尝试

objFF.document.getElementById("sn"). Value = strImei

因为serialnumbercheck是的名称,而不是输入字段,所以请使用objFF.document.getElementByIdsn.value=strImei

代替objFF.document.GetElementByIDSerialNumber Check.Value=strImei