卡拉OK歌库编辑器(修改和删除功能实现不了)

qq342252004 · 发表于 2009-10-4 14:13:53

卡拉OK歌库编辑器(修改和删除功能实现不了)会ACCESS操作的朋友帮帮忙。

下载附件的朋友回贴我补回你被扣的分

ynqjflying52 · 发表于 2009-10-4 14:22:43

路过，看看

afan · 发表于 2009-10-4 17:13:49

提问交流区下载已经不扣金钱了

zhenglei · 发表于 2009-10-4 17:16:05

ddddddddddddddddd抽空看看。

qq342252004 · 发表于 2009-10-4 20:16:30

谢谢afan提醒我以为所以载附件都要钱的呵呵可以省一笔了！

jinhao · 发表于 2009-10-4 21:48:23

下载研究研究

lxz · 发表于 2009-10-5 07:59:08

下载研究研究...

wxb2422 · 发表于 2009-10-5 11:19:05

本帖最后由 wxb2422 于 2009-10-5 11:49 编辑

;修改歌名成功。。其它的你自己加

Func modi()
$SongID0=GUICtrlRead($SongID)
$Name1=GUICtrlRead($Name)
$Singer2=GUICtrlRead($Singer)
$FileName3=GUICtrlRead($FileName)
$Lang4=GUICtrlRead($Lang)
$Type5=GUICtrlRead($Type)
$HC6=GUICtrlRead($HC)
$WordNum7=GUICtrlRead($WordNum)
$PY8=GUICtrlRead($PY)
$DBCount9=GUICtrlRead($DBCount)
$sqlstr="update Song set Song.[name]='"&$Name1 & "'"  & "  WHERE SongID = " & "'" &$SongID0&"'"
                $con.Execute($sqlstr)
                MsgBox(64, "提示:"," 成功修改数据库！") 
EndFunc

Func del()
    $str=GUICtrlRead(GUICtrlRead($ListView1))
         $strsplit=StringSplit($str,"|")
         $con.execute("delete from  Song   WHERE SongID='"&$strsplit[1]&"'") 
         MsgBox(64, "温馨提示:","删除成功!!!")
EndFunc

wxb2422 · 发表于 2009-10-5 12:03:58

提问交流区下载已经不扣金钱了
afan 发表于 2009-10-4 17:13

如果能给我加钱。。我也不介意

qq342252004 · 发表于 2009-10-6 08:41:51

SongID 这一项好象改不了

menfan1 · 发表于 2009-10-6 12:58:09

不错，学习一下。。

		自动登录	找回密码
密码			加入

卡拉OK歌库编辑器(修改和删除功能实现不了)

本帖子中包含更多资源

相关帖子

评分

评分