在NBALIVE2006中修改器是否只对王朝模式有用？

你先建一个王朝，然后存档；

找到你的存档文件夹，在“我的文档”-“NBALIVE2006”-“SAVES”里面，打开你的存档文件夹，找到‘Players.dbf’，然后用‘microsoft excle’方式打开（如果你的电脑没装microsoft excle就不行），里面是所有球员的各项属性，随便你改，改完之后保存就行了。

以下是player.dbf中英文的翻译

DELETED 是否被删除，一般为FALSE

NAME 名字

FNAME 姓氏

NICKNAMEID 绰号

PLAYERID 选手的ID

NUMBER 球衣号码

POSITION 在场上的位置：0-5,分别对应C、PF、SF、SG、PG

POSITION2 在场上第二位置

YEARSEXP 球龄

SCHOOLNUM 学校的号码，见schools.dbf

HAND 投球手，0为右手，1为左手

SHOELIMIT 球鞋，1-3对应nike,adidas,reebok

ORIGHSHOE 主场球鞋

ORIGASHOE 客场球鞋

OVERALLRTG 总评

PLAYRVALUE 选手的价值，由游戏自动计算

FGPBASE 投篮

THREEPTBAS 三分

FTPBASE 罚篮

DNKABILITY 灌篮

STLABILITY 偷球

BLKABILITY 盖帽

OREABILITY 进攻篮板

DREABILITY 防守篮板

BALABILITY 传球

OFFABILITY 进攻意识

DEFABILITY 防守意识

SPEED 速度

QUICK 敏捷

JUMP 弹跳

DRIBBLE 运球

DSTRENGTH 体力

DHARDY 强壮，这个决定是否容易受伤

DSHOOTRANG 射程

FATIGUE 耐力

INSIDESC 内线

THREEPTATT 三分出手率

PRIMACY 得分，电脑控制下的得分

SCOREAREA 得分区域

FACIALCTRL 表情

FTRITUAL 罚篮姿势

AUDIONICK 绰号的发音，用于场外评论

CELEBPACK 庆祝姿势

THREEPTSTY 投三分的姿势

ORIGTEAM 原球队

TEAM 现球队

ROSTERPOS 替换顺序，1-5为先发阵容

BIRTHDATE 生日

BTOWNID 出生地

DPLACE 选秀顺位

DROUND 选秀轮次

DOVERALL 选秀排名

DRAFTYEAR 选秀年份

DRAFTEDBY 选秀队伍

SCRATCH1

SCRATCH2

SCRATCH3

DUNKPACK 灌篮姿势

DESTINY 潜力

INJURYID 受伤

INJURYDATE 受伤时间

RECOVRDATE 复原时间

ISPLAYABLE 能否比赛

ISCREATED 是否自建

ISGENERATE 是否系统生成

ISHISTORIC 有否传奇巨星

TRADEABLE 能否交换

PLAYERPKG 头像ID

INSEASON 是否在常规赛上场

INPLAYOFF 是否在季后赛上场

ROOKIEPKG 新人潜力

ROOKVALUE 新人价值

ROOKIERANK 新人主位置

ROOKIERNK2 新人次位置

CASH_YEAR 年薪

CASH_TOTAL 总薪

CASH_RAISE 浮薪

YEARS_LONG 合同年限

YEARS_LEFT 合同剩余年限

CASH_TEAM 支薪球队

PREF_LEN 要求续约年限

MIN_TARGET 能接受的最少薪水

LOWBALLED

ISMINIMUM 底薪

WEEKLYMVP MVP周数

MONTHLYMVP MVP月数

SUPERSTAR 超级巨星

OFFVALUE 进攻价值

DEFVALUE 防守价值

SFGATT 上赛季出手次数

SFGMAD 上赛季命中次数

STHREEATT 上赛季三分出手

STHREEMAD 上赛季三分命中

SFTATT 上赛季罚篮出手

SFTMAD 上赛季罚篮命中

SBLOCKS 上赛季盖帽次数

SOFFREB 上赛季进攻篮板

SASSISTS 上赛季助攻次数

SPERFOUL 上赛季犯规次数

SSTEALS 上赛季偷球次数

SDEFREB 上赛季防守篮板

STURNOVER 上赛季失误次数

SMINUTES 上赛季上场时间

SGAMES 上赛季上场次数

SGSTART 上赛季首发次数

SEJECT 上赛季犯规出场次数

CSFGATT 本赛季出手次数

CSFGMAD 本赛季命中次数

CSTHREEATT 本赛季三分出手

CSTHREEMAD 本赛季三分命中

CSFTATT 本赛季罚篮出手

CSFTMAD 本赛季罚篮命中

CSBLOCKS 本赛季盖帽次数

CSOFFREB 本赛季进攻篮板

CSASSISTS 本赛季助攻次数

CSPERFOUL 本赛季犯规次数

CSSTEALS 本赛季偷球次数

CSDEFREB 本赛季防守篮板

CSTURNOVER 本赛季失误次数

CSMINUTES 本赛季本场时间

CSGAMES 本赛季本场次数

CSGSTART 本赛季首发次数

CSEJECT 本赛季犯规出场次数

PFGATT 上赛季季后赛出手次数

PFGMAD 上赛季季后赛命中次数

PTHREEATT 上赛季季后赛三分出手

PTHREEMAD 上赛季季后赛三分命中

PFTATT 上赛季季后赛罚篮出手

PFTMAD 上赛季季后赛罚篮命中

PBLOCKS 上赛季季后赛盖帽次数

POFFREB 上赛季季后赛进攻篮板

PASSISTS 上赛季季后赛助攻次数

PPERFOUL 上赛季季后赛犯规次数

PSTEALS 上赛季季后赛偷球次数

PDEFREB 上赛季季后赛防守篮板

PTURNOVER 上赛季季后赛失误次数

PMINUTES 上赛季季后赛上场时间

PGAMES 上赛季季后赛上场次数

PGSTART 上赛季季后赛首发次数

PEJECT 上赛季季后赛犯规出场次数

CPFGATT 本赛季季后赛出手次数

CPFGMAD 本赛季季后赛命中次数

CPTHREEAT 本赛季季后赛三分出手

CPTHREEMAD 本赛季季后赛三分命中

CPFTATT 本赛季季后赛罚篮出手

CPFTMAD 本赛季季后赛罚篮命中

CPBLOCKS 本赛季季后赛盖帽次数

CPOFFREB 本赛季季后赛进攻篮板

CPASSISTS 本赛季季后赛助攻次数

CPPERFOUL 本赛季季后赛犯规次数

CPSTEALS 本赛季季后赛偷球次数

CPDEFREB 本赛季季后赛防守篮板

CPTURNOVER 本赛季季后赛失误次数

CPMINUTES 本赛季季后赛本场时间

CPGAMES 本赛季季后赛本场次数

CPGSTART 本赛季季后赛首发次数

CPEJECT 本赛季季后赛犯规出场次数

LEARNING 学习能力

WORKETHC 努力程度

BIRDRIGHTS 伯德条款下的年限

CASHRESIGN 辞退所需金额

SPEECHID 语音ID

SPECMAP

ISEDITED 是否修改

ISORIGSS 是否修改过超级巨星类型

VALIDSSTAR 可用巨星类型

DFLTTEAM 原球队

Microsoft VBScript 运行时错误 错误 '800a0046'

pcb layout的意思是：印刷电路板，又称印制电路板，作为电子元件的载体，实现了电子元器件之间的线路连接和功能实现。传统的电路板工艺，采用了印刷蚀刻阻剂的工法，做出电路的线路及图面，因此被称为印制电路板或印刷线路板。

特性：21世纪人类进入了信息化社会，电子产业得到了飞速发展，人们的工作生活和各种电子产品密不可分。而作为电子产品不可缺少的重要载体-PCB，也扮演了日益重要的角色。电子设备呈现高性能、高速、轻薄的趋势,PCB作为多学科行业已成为电子设备最关键技术之一。PCB行业在电子互连技术中占有举足轻重的地位。

发展历史：1925年，美国的Charles Ducas 在绝缘基板上印刷出线路图案，再以电镀的方式，建立导线。这是开启现代PCB技术的一个标志。

开始->运行->dcomcnfg

找到\\\"Microsoft Excel 应用程序\\\"(这个名称取决于你调用的Object是什么)，然后右键->Properties->security把三个权限都给everyone即可,其实第一个Launch & activate即可

这是权限的问题.

还有一个简单的方法，就是找到c:\windows目录中的scrrun.dll文件，设置属性中的安全，加入user组，并给予读取和运行、读取即可。

你也可以把网站放到FAT32分区试一下.因为在NTFS分区,有关于权限问题有一些程序莫明其妙就出错了

试试这个无组件上传吧!用得比较多

文件：upload_5xsoft.inc

'''''''''''''''''''''''''''''''''''''''''''''''''

'

'请保留此信息: 稻香老农制作 ;

'

'''''''''''''''''''''''''''''''''''''''''''''''''

dim upfile_5xSoft_Stream

Class upload_5xSoft

dim Form,File,Version

Private Sub Class_Initialize

dim iStart,iFileNameStart,iFileNameEnd,iEnd,vbEnter,iFormStart,iFormEnd,theFile

dim strDiv,mFormName,mFormValue,mFileName,mFileSize,mFilePath,iDivLen,mStr

Version="数据添加成功!!"

if Request.TotalBytes0 and iFileNameStartiStart then

mFileSize=iEnd-iStart-4

else

mFileSize=0

end if

set theFile=new FileInfo

theFile.FileName=getFileName(mFileName)

theFile.FilePath=getFilePath(mFileName)

theFile.FileSize=mFileSize

theFile.FileStart=iStart+4

theFile.FormName=FormName

file.add mFormName,theFile

else

iStart=inString(iEnd+1,vbEnter&vbEnter)

iEnd=inString(iStart+4,vbEnter&strDiv)

if iEnd>iStart then

mFormValue=subString(iStart+4,iEnd-iStart-4)

else

mFormValue=""

end if

form.Add mFormName,mFormValue

end if

iFormStart=iformEnd+iDivLen

iFormEnd=inString(iformStart,strDiv)-1

wend

End Sub

Private Function subString(theStart,theLen)

dim i,c,stemp

upfile_5xSoft_Stream.Position=theStart-1

stemp=""

for i=1 to theLen

if upfile_5xSoft_Stream.EOS then Exit for

c=ascB(upfile_5xSoft_Stream.Read(1))

If c > 127 Then

if upfile_5xSoft_Stream.EOS then Exit for

stemp=stemp&Chr(AscW(ChrB(AscB(upfile_5xSoft_Stream.Read(1)))&ChrB(c)))

i=i+1

else

stemp=stemp&Chr(c)

End If

Next

subString=stemp

End function

Private Function inString(theStart,varStr)

dim i,j,bt,theLen,str

InString=0

Str=toByte(varStr)

theLen=LenB(Str)

for i=theStart to upfile_5xSoft_Stream.Size-theLen

if i>upfile_5xSoft_Stream.size then exit Function

upfile_5xSoft_Stream.Position=i-1

if AscB(upfile_5xSoft_Stream.Read(1))=AscB(midB(Str,1)) then

InString=i

for j=2 to theLen

if upfile_5xSoft_Stream.EOS then

inString=0

Exit for

end if

if AscB(upfile_5xSoft_Stream.Read(1))AscB(MidB(Str,j,1)) then

InString=0

Exit For

end if

next

if InString0 then Exit Function

end if

next

End Function

Private Sub Class_Terminate

form.RemoveAll

file.RemoveAll

set form=nothing

set file=nothing

upfile_5xSoft_Stream.close

set upfile_5xSoft_Stream=nothing

End Sub

Private function GetFilePath(FullPath)

If FullPath "" Then

GetFilePath = left(FullPath,InStrRev(FullPath, "\"))

Else

GetFilePath = ""

End If

End function

Private function GetFileName(FullPath)

If FullPath "" Then

GetFileName = mid(FullPath,InStrRev(FullPath, "\")+1)

Else

GetFileName = ""

End If

End function

Private function toByte(Str)

dim i,iCode,c,iLow,iHigh

toByte=""

For i=1 To Len(Str)

c=mid(Str,i,1)

iCode =Asc(c)

If iCode255 Then

iLow = Left(Hex(Asc(c)),2)

iHigh =Right(Hex(Asc(c)),2)

toByte = toByte & chrB("&H"&iLow) & chrB("&H"&iHigh)

Else

toByte = toByte & chrB(AscB(c))

End If

Next

End function

End Class

Class FileInfo

dim FormName,FileName,FilePath,FileSize,FileStart

Private Sub Class_Initialize

FileName = ""

FilePath = ""

FileSize = 0

FileStart= 0

FormName = ""

End Sub

Public function SaveAs(FullPath)

dim dr,ErrorChar,i

SaveAs=1

if trim(fullpath)="" or FileSize=0 or FileStart=0 or FileName="" then exit function

if FileStart=0 or right(fullpath,1)="/" then exit function

set dr=CreateObject("Adodb.Stream")

dr.Mode=3

dr.Type=1

dr.Open

upfile_5xSoft_Stream.position=FileStart-1

upfile_5xSoft_Stream.copyto dr,FileSize

dr.SaveToFile FullPath,2

dr.Close

set dr=nothing

SaveAs=0

end function

End Class

上传表单:

上传:

文件upload.asp

0 then

response.write "
"&file.FilePath&file.FileName&",大小:"&file.FileSize&" => "&formPath&file.FileName

file.SaveAs Server.mappath(formPath&file.FileName)

end if

next

%>

鹏仔微信 15129739599 鹏仔QQ344225443 鹏仔前端 pjxi.com 共享博客 sharedbk.com