怎么用asp来创建类和类对象。<%classVbclassdimvb_1subvbShow() vb_1=1 response.write"你好"endsubendclassdimVbcsetVbc=newVbclass'创建类对象Vbc.vbshow'调用类方法response.writeVbc.vb_1'或的类属性%>这里有个见的类和创建...

ASP中避免重复生成编号小弟最近用ASP做了一个系统，在添加数据时，系统会自动生成一个编号（不可重复），可是当两个人同时进行添加数据时，会这样会出现编号重复的现象，请问有什么方法可以解决？编号是以s-07-001开始，按照顺序递增的color='#e78608'>------解决方案--------------------<%FunctionGetOrderSerial(ByRefdb)Di...

ＶＢ我一点不会用．我封装了数据库连接．但在asp里不会调用了．明白人帮我一把．谢谢1.VB里封装成：shou.dllPublicFunctionDBConn()Dimconn,connstr,db,rs,rs_s,rs_s1DimstrSQLServerNameDimstrSQLDBUserNameDimstrSQLDBPasswordDimstrSQLDBNamestrSQLServerName...

为什么现在网上搜索的VBS读注册表的代码都不能运行？<SCRIPTlanguage=VBScript> DimOperationRegistry SetOperationRegistry=WScript.CreateObject("WScript.Shell") DimRead_Data1,Read_Data2 Read_Data1=OperationRegistr...

openoffice--查找文本并设置文本字体的宏SubMainDimoDocumentAsObjectDimoSearchAsObject,oResultAsObjectDimoFoundAsObject,oFoundCursorAsObjectDimnAsLongoDocument=ThisComponentoSearch=oDocument.createSearchDescriptor'oS...

在一张工作薄有多个sheet,如何把列中相同的标出来，请教，小弟有一个工作薄，内有多个sheet,格式完全相同，如何对多个sheet的B列进行比较，把相同的单元格在每个sheet中标注出来。谢谢！color='#e78608'>------解决方案--------------------------------------------------------DimsheetcountAsInteg...

如何截取字符在excel中的单元格中（如第２行第２列）数值为0.5，请问如何读取0和５分别放在第3行第２列和第4行第２列color='#e78608'>------解决方案--------------------------------------------------------第3行第２列=INT(A1)第4行第２列=MID(A1-INT(A1),3,100000)color='#e7860...

LBound()问题我定义一个三维数组dimqz(1to100,1to50,1to12)请问怎么取得第二维的Len。LBound(qz)取得是最外层的。LBound(qz（1）)报错，请问怎么得到LBound(qz（1）)的效果color='#e78608'>------解决方案--------------------------------------------------------lbou...

请高手指点D层疑问'删除学生表记录PublicFunctiondel_student(ByValtstCardAsModel.CardModel)AsIntegerDimstrSQLAsString="delete*fromStudent_infowherecardNO=@cardno"Dimparams()AsSqlParameter={NewSqlParameter("@cardno",tst...

一个脚本的小问题vartype_dim_id="-1";vartype_id="-1";vardimObj=document.all.type_dim_id;for(vari=0;i<dimObj.length;i++){if(dimObj[i].checked){varinputs=document.getElementsByTagName(&quo...

jacob如何传参数名？word的Window.GetPoint方法word的Window.GetPoint方法需要传5个参数：表达式.GetPoint(ScreenPixelsLeft,ScreenPixelsTop,ScreenPixelsWidth,ScreenPixelsHeight,obj)前面四个参数是变量名DimpLeftAsLongDimpTopAsLongDimpWidthAsL...

水晶报表子报表显示问题我的一个水晶报表中包含一个子报表，可在VB程序每次预览时都提示子报表登录失败，但在水晶报表软件中预览时正常显示，不知道这样如何解决？color='#e78608'>------解决方案--------------------------------------------------------'显示子报表FunctionshowSubReport(ByValmainRepo...

对录入的数据分割请问有什么办法可以对录入的数据进行分割，比如说在textbox里输入15、16、17点击提交时，可以获取到三个分开的数据151617尽量给出后台代码，谢谢color='#e78608'>------解决方案--------------------------------------------------------DimServerNameAsStringDimStr()AsSt...

含代码VB.NET动态生成DROPDOWNLIST里的数据，请问我错在哪里？DimStrSkillAsStringDimobjDataTalbeAsDataTable'DimTablerowsAsDataRowDimddlAsDropDownList'对每行数据遍历ForEachobjRowAsGridViewRowInMe.GridView1.RowsStrSkill=objRow.Cells(...

一句话的问题,C#转VB.netLinkButtonbutton=casLinkButton;这句C＃如何转换为vb.net代码，关键是个那个as....color='#e78608'>------解决方案--------------------------------------------------------vb不会。。帮顶color='#e78608'>------解决方案-------...

正则表达式如何提取地址中的省市???比如:stringstr="浙江省杭州市某街道118号";如何利用正则表达式提取出浙江和杭州C#color='#e78608'>------解决方案--------------------------------------------------------trystringstr="浙江省杭州市某街道118号";str...

为什么这样增加DropDownList值没效果我想自己设定下拉列表中的选项，可是列表始终是空白地，哪里问题？subshow_fenlei DimconnstrAsString=ConfigurationSettings.AppSettings("ConnectionString") DimqueryStringAsString="selectid,mingchengf...

关于SqlParameter构造函数的用法当使用SqlParameter构造函数PublicSubNew(String,Object)和PublicSubNew(String,SqlDbType)的效率和其他方面是否有区别,也就事下面的代码哪个比较好点:DimcmdasNewSqlCommand()DimdrasSqlDataReadercmd.CommandText="Select*F...

oracle查出字段中含有英文的记录的sqlselect*fromdim_swjgjwheretranslate(trim(j.swjg_id),'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz','')<>trim(j.swjg_id);?

用代理发送邮件CS下，要用代理实现邮件发送，且在邮件中夹带附件，附件是指定路径的，要如何实现？（邮件要发送到163邮箱的）color='#e78608'>------解决方案--------------------可以把附件先上载到邮件的body域中,然后在发送,要给163,那就要设置能对外发邮件了的color='#e78608'>------解决方案--------------------首先你...